/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / pc-select.elc.z / pc-select.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 72 6d 73 40 6d 6f 6c |piled by| rms@mol|
|00000020| 65 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |e.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 53 75 6e 20 | 4d 61 72 20 20 33 20 30 | on Sun |Mar  3 0|
|00000040| 34 3a 33 32 3a 33 33 20 | 31 39 39 36 0a 3b 3b 3b |4:32:33 |1996.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 68 6f 6d 65 | from fi|le /home|
|00000060| 2f 66 73 66 2f 72 6d 73 | 2f 65 31 39 2f 6c 69 73 |/fsf/rms|/e19/lis|
|00000070| 70 2f 70 63 2d 73 65 6c | 65 63 74 2e 65 6c 0a 3b |p/pc-sel|ect.el.;|
|00000080| 3b 3b 20 65 6d 61 63 73 | 20 76 65 72 73 69 6f 6e |;; emacs| version|
|00000090| 20 31 39 2e 33 30 2e 39 | 31 2e 32 2e 0a 3b 3b 3b | 19.30.9|1.2..;;;|
|000000a0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000b0| 6e 20 46 53 46 20 32 2e | 31 30 0a 3b 3b 3b 20 6f |n FSF 2.|10.;;; o|
|000000c0| 70 74 69 6d 69 7a 61 74 | 69 6f 6e 20 69 73 20 6f |ptimizat|ion is o|
|000000d0| 6e 2e 0a 3b 3b 3b 20 74 | 68 69 73 20 66 69 6c 65 |n..;;; t|his file|
|000000e0| 20 75 73 65 73 20 6f 70 | 63 6f 64 65 73 20 77 68 | uses op|codes wh|
|000000f0| 69 63 68 20 64 6f 20 6e | 6f 74 20 65 78 69 73 74 |ich do n|ot exist|
|00000100| 20 69 6e 20 45 6d 61 63 | 73 20 31 38 2e 0a 0a 28 | in Emac|s 18...(|
|00000110| 69 66 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |if (and |(boundp |
|00000120| 27 65 6d 61 63 73 2d 76 | 65 72 73 69 6f 6e 29 0a |'emacs-v|ersion).|
|00000130| 09 20 28 6f 72 20 28 61 | 6e 64 20 28 62 6f 75 6e |. (or (a|nd (boun|
|00000140| 64 70 20 27 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |dp 'epoc|h::versi|
|00000150| 6f 6e 29 20 65 70 6f 63 | 68 3a 3a 76 65 72 73 69 |on) epoc|h::versi|
|00000160| 6f 6e 29 0a 09 20 20 20 | 20 20 28 73 74 72 69 6e |on)..   |  (strin|
|00000170| 67 2d 6c 65 73 73 70 20 | 65 6d 61 63 73 2d 76 65 |g-lessp |emacs-ve|
|00000180| 72 73 69 6f 6e 20 22 31 | 39 2e 32 39 22 29 29 29 |rsion "1|9.29")))|
|00000190| 0a 20 20 20 20 28 65 72 | 72 6f 72 20 22 60 70 63 |.    (er|ror "`pc|
|000001a0| 2d 73 65 6c 65 63 74 2e | 65 6c 27 20 77 61 73 20 |-select.|el' was |
|000001b0| 63 6f 6d 70 69 6c 65 64 | 20 66 6f 72 20 45 6d 61 |compiled| for Ema|
|000001c0| 63 73 20 31 39 2e 32 39 | 20 6f 72 20 6c 61 74 65 |cs 19.29| or late|
|000001d0| 72 22 29 29 0a 0a 0a 28 | 70 72 6f 76 69 64 65 20 |r"))...(|provide |
|000001e0| 28 71 75 6f 74 65 20 70 | 63 2d 73 65 6c 65 63 74 |(quote p|c-select|
|000001f0| 29 29 0a 23 40 32 35 37 | 20 53 61 76 65 20 74 68 |)).#@257| Save th|
|00000200| 65 20 72 65 67 69 6f 6e | 20 61 73 20 69 66 20 6b |e region| as if k|
|00000210| 69 6c 6c 65 64 3b 20 62 | 75 74 20 64 6f 6e 27 74 |illed; b|ut don't|
|00000220| 20 6b 69 6c 6c 20 69 74 | 3b 20 64 65 61 63 74 69 | kill it|; deacti|
|00000230| 76 61 74 65 20 6d 61 72 | 6b 2e 0a 49 66 20 60 69 |vate mar|k..If `i|
|00000240| 6e 74 65 72 70 72 6f 67 | 72 61 6d 2d 63 75 74 2d |nterprog|ram-cut-|
|00000250| 66 75 6e 63 74 69 6f 6e | 27 20 69 73 20 6e 6f 6e |function|' is non|
|00000260| 2d 6e 69 6c 2c 20 61 6c | 73 6f 20 73 61 76 65 20 |-nil, al|so save |
|00000270| 74 68 65 20 74 65 78 74 | 20 66 6f 72 20 61 20 77 |the text| for a w|
|00000280| 69 6e 64 6f 77 0a 73 79 | 73 74 65 6d 20 63 75 74 |indow.sy|stem cut|
|00000290| 20 61 6e 64 20 70 61 73 | 74 65 2e 0a 0a 44 65 61 | and pas|te...Dea|
|000002a0| 63 74 69 76 61 74 69 6e | 67 20 6d 61 72 6b 20 69 |ctivatin|g mark i|
|000002b0| 73 20 74 6f 20 61 76 6f | 69 64 20 63 6f 6e 66 75 |s to avo|id confu|
|000002c0| 73 69 6f 6e 20 77 69 74 | 68 20 64 65 6c 65 74 65 |sion wit|h delete|
|000002d0| 2d 73 65 6c 65 63 74 69 | 6f 6e 2d 6d 6f 64 65 0a |-selecti|on-mode.|
|000002e0| 61 6e 64 20 74 72 61 6e | 73 69 65 6e 74 2d 6d 61 |and tran|sient-ma|
|000002f0| 72 6b 2d 6d 6f 64 65 2e | 1f 0a 28 64 65 66 61 6c |rk-mode.|..(defal|
|00000300| 69 61 73 20 27 63 6f 70 | 79 2d 72 65 67 69 6f 6e |ias 'cop|y-region|
|00000310| 2d 61 73 2d 6b 69 6c 6c | 2d 6e 6f 6d 61 72 6b 20 |-as-kill|-nomark |
|00000320| 23 5b 28 62 65 67 20 65 | 6e 64 29 20 22 c0 09 5c |#[(beg e|nd) "..\|
|00000330| 6e 5c 22 88 c3 14 c5 c6 | 21 87 22 20 5b 63 6f 70 |n\".....|!." [cop|
|00000340| 79 2d 72 65 67 69 6f 6e | 2d 61 73 2d 6b 69 6c 6c |y-region|-as-kill|
|00000350| 20 62 65 67 20 65 6e 64 | 20 6e 69 6c 20 6d 61 72 | beg end| nil mar|
|00000360| 6b 2d 61 63 74 69 76 65 | 20 6d 65 73 73 61 67 65 |k-active| message|
|00000370| 20 22 52 65 67 69 6f 6e | 20 73 61 76 65 64 22 5d | "Region| saved"]|
|00000380| 20 33 20 28 23 24 20 2e | 20 35 30 35 29 20 22 72 | 3 (#$ .| 505) "r|
|00000390| 22 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 65 |"]).(def|alias 'e|
|000003a0| 6e 73 75 72 65 2d 6d 61 | 72 6b 20 23 5b 6e 69 6c |nsure-ma|rk #[nil|
|000003b0| 20 22 08 3f 85 08 00 c1 | c2 21 87 22 20 5b 6d 61 | ".?....|.!." [ma|
|000003c0| 72 6b 2d 61 63 74 69 76 | 65 20 73 65 74 2d 6d 61 |rk-activ|e set-ma|
|000003d0| 72 6b 2d 63 6f 6d 6d 61 | 6e 64 20 6e 69 6c 5d 20 |rk-comma|nd nil] |
|000003e0| 32 5d 29 0a 23 40 31 33 | 30 20 45 6e 73 75 72 65 |2]).#@13|0 Ensure|
|000003f0| 20 6d 61 72 6b 20 69 73 | 20 61 63 74 69 76 65 3b | mark is| active;|
|00000400| 20 6d 6f 76 65 20 70 6f | 69 6e 74 20 72 69 67 68 | move po|int righ|
|00000410| 74 20 41 52 47 20 63 68 | 61 72 61 63 74 65 72 73 |t ARG ch|aracters|
|00000420| 20 28 6c 65 66 74 20 69 | 66 20 41 52 47 20 6e 65 | (left i|f ARG ne|
|00000430| 67 61 74 69 76 65 29 2e | 0a 4f 6e 20 72 65 61 63 |gative).|.On reac|
|00000440| 68 69 6e 67 20 65 6e 64 | 20 6f 66 20 62 75 66 66 |hing end| of buff|
|00000450| 65 72 2c 20 73 74 6f 70 | 20 61 6e 64 20 73 69 67 |er, stop| and sig|
|00000460| 6e 61 6c 20 65 72 72 6f | 72 2e 1f 0a 28 64 65 66 |nal erro|r...(def|
|00000470| 61 6c 69 61 73 20 27 66 | 6f 72 77 61 72 64 2d 63 |alias 'f|orward-c|
|00000480| 68 61 72 2d 6d 61 72 6b | 20 23 5b 28 26 6f 70 74 |har-mark| #[(&opt|
|00000490| 69 6f 6e 61 6c 20 61 72 | 67 29 20 22 c0 20 88 09 |ional ar|g) ". ..|
|000004a0| 75 87 22 20 5b 65 6e 73 | 75 72 65 2d 6d 61 72 6b |u." [ens|ure-mark|
|000004b0| 20 61 72 67 5d 20 31 20 | 28 23 24 20 2e 20 31 30 | arg] 1 |(#$ . 10|
|000004c0| 30 32 29 20 22 70 22 5d | 29 0a 23 40 31 38 30 20 |02) "p"]|).#@180 |
|000004d0| 45 6e 73 75 72 65 20 6d | 61 72 6b 20 69 73 20 61 |Ensure m|ark is a|
|000004e0| 63 74 69 76 65 3b 20 6d | 6f 76 65 20 70 6f 69 6e |ctive; m|ove poin|
|000004f0| 74 20 72 69 67 68 74 20 | 41 52 47 20 77 6f 72 64 |t right |ARG word|
|00000500| 73 20 28 62 61 63 6b 77 | 61 72 64 20 69 66 20 41 |s (backw|ard if A|
|00000510| 52 47 20 69 73 20 6e 65 | 67 61 74 69 76 65 29 2e |RG is ne|gative).|
|00000520| 0a 4e 6f 72 6d 61 6c 6c | 79 20 72 65 74 75 72 6e |.Normall|y return|
|00000530| 73 20 74 2e 0a 49 66 20 | 61 6e 20 65 64 67 65 20 |s t..If |an edge |
|00000540| 6f 66 20 74 68 65 20 62 | 75 66 66 65 72 20 69 73 |of the b|uffer is|
|00000550| 20 72 65 61 63 68 65 64 | 2c 20 70 6f 69 6e 74 20 | reached|, point |
|00000560| 69 73 20 6c 65 66 74 20 | 74 68 65 72 65 0a 61 6e |is left |there.an|
|00000570| 64 20 6e 69 6c 20 69 73 | 20 72 65 74 75 72 6e 65 |d nil is| returne|
|00000580| 64 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 66 |d...(def|alias 'f|
|00000590| 6f 72 77 61 72 64 2d 77 | 6f 72 64 2d 6d 61 72 6b |orward-w|ord-mark|
|000005a0| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 61 72 | #[(&opt|ional ar|
|000005b0| 67 29 20 22 c0 20 88 09 | 76 87 22 20 5b 65 6e 73 |g) ". ..|v." [ens|
|000005c0| 75 72 65 2d 6d 61 72 6b | 20 61 72 67 5d 20 31 20 |ure-mark| arg] 1 |
|000005d0| 28 23 24 20 2e 20 31 32 | 33 32 29 20 22 70 22 5d |(#$ . 12|32) "p"]|
|000005e0| 29 0a 23 40 34 33 33 20 | 45 6e 73 75 72 65 20 6d |).#@433 |Ensure m|
|000005f0| 61 72 6b 20 69 73 20 61 | 63 74 69 76 65 3b 20 6d |ark is a|ctive; m|
|00000600| 6f 76 65 20 66 6f 72 77 | 61 72 64 20 74 6f 20 65 |ove forw|ard to e|
|00000610| 6e 64 20 6f 66 20 70 61 | 72 61 67 72 61 70 68 2e |nd of pa|ragraph.|
|00000620| 0a 57 69 74 68 20 61 72 | 67 20 4e 2c 20 64 6f 20 |.With ar|g N, do |
|00000630| 69 74 20 4e 20 74 69 6d | 65 73 3b 20 6e 65 67 61 |it N tim|es; nega|
|00000640| 74 69 76 65 20 61 72 67 | 20 2d 4e 20 6d 65 61 6e |tive arg| -N mean|
|00000650| 73 20 6d 6f 76 65 20 62 | 61 63 6b 77 61 72 64 20 |s move b|ackward |
|00000660| 4e 20 70 61 72 61 67 72 | 61 70 68 73 2e 0a 0a 41 |N paragr|aphs...A|
|00000670| 20 6c 69 6e 65 20 77 68 | 69 63 68 20 60 70 61 72 | line wh|ich `par|
|00000680| 61 67 72 61 70 68 2d 73 | 74 61 72 74 27 20 6d 61 |agraph-s|tart' ma|
|00000690| 74 63 68 65 73 20 65 69 | 74 68 65 72 20 73 65 70 |tches ei|ther sep|
|000006a0| 61 72 61 74 65 73 20 70 | 61 72 61 67 72 61 70 68 |arates p|aragraph|
|000006b0| 73 0a 28 69 66 20 60 70 | 61 72 61 67 72 61 70 68 |s.(if `p|aragraph|
|000006c0| 2d 73 65 70 61 72 61 74 | 65 27 20 6d 61 74 63 68 |-separat|e' match|
|000006d0| 65 73 20 69 74 20 61 6c | 73 6f 29 20 6f 72 20 69 |es it al|so) or i|
|000006e0| 73 20 74 68 65 20 66 69 | 72 73 74 20 6c 69 6e 65 |s the fi|rst line|
|000006f0| 20 6f 66 20 61 20 70 61 | 72 61 67 72 61 70 68 2e | of a pa|ragraph.|
|00000700| 0a 41 20 70 61 72 61 67 | 72 61 70 68 20 65 6e 64 |.A parag|raph end|
|00000710| 20 69 73 20 74 68 65 20 | 62 65 67 69 6e 6e 69 6e | is the |beginnin|
|00000720| 67 20 6f 66 20 61 20 6c | 69 6e 65 20 77 68 69 63 |g of a l|ine whic|
|00000730| 68 20 69 73 20 6e 6f 74 | 20 70 61 72 74 20 6f 66 |h is not| part of|
|00000740| 20 74 68 65 20 70 61 72 | 61 67 72 61 70 68 0a 74 | the par|agraph.t|
|00000750| 6f 20 77 68 69 63 68 20 | 74 68 65 20 65 6e 64 20 |o which |the end |
|00000760| 6f 66 20 74 68 65 20 70 | 72 65 76 69 6f 75 73 20 |of the p|revious |
|00000770| 6c 69 6e 65 20 62 65 6c | 6f 6e 67 73 2c 20 6f 72 |line bel|ongs, or|
|00000780| 20 74 68 65 20 65 6e 64 | 20 6f 66 20 74 68 65 20 | the end| of the |
|00000790| 62 75 66 66 65 72 2e 1f | 0a 28 64 65 66 61 6c 69 |buffer..|.(defali|
|000007a0| 61 73 20 27 66 6f 72 77 | 61 72 64 2d 70 61 72 61 |as 'forw|ard-para|
|000007b0| 67 72 61 70 68 2d 6d 61 | 72 6b 20 23 5b 28 26 6f |graph-ma|rk #[(&o|
|000007c0| 70 74 69 6f 6e 61 6c 20 | 61 72 67 29 20 22 c0 20 |ptional |arg) ". |
|000007d0| 88 c1 5c 6e 21 87 22 20 | 5b 65 6e 73 75 72 65 2d |..\n!." |[ensure-|
|000007e0| 6d 61 72 6b 20 66 6f 72 | 77 61 72 64 2d 70 61 72 |mark for|ward-par|
|000007f0| 61 67 72 61 70 68 20 61 | 72 67 5d 20 32 20 28 23 |agraph a|rg] 2 (#|
|00000800| 24 20 2e 20 31 35 31 32 | 29 20 22 70 22 5d 29 0a |$ . 1512|) "p"]).|
|00000810| 23 40 38 32 36 20 45 6e | 73 75 72 65 20 6d 61 72 |#@826 En|sure mar|
|00000820| 6b 20 69 73 20 61 63 74 | 69 76 65 3b 20 6d 6f 76 |k is act|ive; mov|
|00000830| 65 20 63 75 72 73 6f 72 | 20 76 65 72 74 69 63 61 |e cursor| vertica|
|00000840| 6c 6c 79 20 64 6f 77 6e | 20 41 52 47 20 6c 69 6e |lly down| ARG lin|
|00000850| 65 73 2e 0a 49 66 20 74 | 68 65 72 65 20 69 73 20 |es..If t|here is |
|00000860| 6e 6f 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |no chara|cter in |
|00000870| 74 68 65 20 74 61 72 67 | 65 74 20 6c 69 6e 65 20 |the targ|et line |
|00000880| 65 78 61 63 74 6c 79 20 | 75 6e 64 65 72 20 74 68 |exactly |under th|
|00000890| 65 20 63 75 72 72 65 6e | 74 20 63 6f 6c 75 6d 6e |e curren|t column|
|000008a0| 2c 0a 74 68 65 20 63 75 | 72 73 6f 72 20 69 73 20 |,.the cu|rsor is |
|000008b0| 70 6f 73 69 74 69 6f 6e | 65 64 20 61 66 74 65 72 |position|ed after|
|000008c0| 20 74 68 65 20 63 68 61 | 72 61 63 74 65 72 20 69 | the cha|racter i|
|000008d0| 6e 20 74 68 61 74 20 6c | 69 6e 65 20 77 68 69 63 |n that l|ine whic|
|000008e0| 68 20 73 70 61 6e 73 20 | 74 68 69 73 0a 63 6f 6c |h spans |this.col|
|000008f0| 75 6d 6e 2c 20 6f 72 20 | 61 74 20 74 68 65 20 65 |umn, or |at the e|
|00000900| 6e 64 20 6f 66 20 74 68 | 65 20 6c 69 6e 65 20 69 |nd of th|e line i|
|00000910| 66 20 69 74 20 69 73 20 | 6e 6f 74 20 6c 6f 6e 67 |f it is |not long|
|00000920| 20 65 6e 6f 75 67 68 2e | 0a 49 66 20 74 68 65 72 | enough.|.If ther|
|00000930| 65 20 69 73 20 6e 6f 20 | 6c 69 6e 65 20 69 6e 20 |e is no |line in |
|00000940| 74 68 65 20 62 75 66 66 | 65 72 20 61 66 74 65 72 |the buff|er after|
|00000950| 20 74 68 69 73 20 6f 6e | 65 2c 20 62 65 68 61 76 | this on|e, behav|
|00000960| 69 6f 72 20 64 65 70 65 | 6e 64 73 20 6f 6e 20 74 |ior depe|nds on t|
|00000970| 68 65 0a 76 61 6c 75 65 | 20 6f 66 20 60 6e 65 78 |he.value| of `nex|
|00000980| 74 2d 6c 69 6e 65 2d 61 | 64 64 2d 6e 65 77 6c 69 |t-line-a|dd-newli|
|00000990| 6e 65 73 27 2e 20 20 49 | 66 20 6e 6f 6e 2d 6e 69 |nes'.  I|f non-ni|
|000009a0| 6c 2c 20 69 74 20 69 6e | 73 65 72 74 73 20 61 20 |l, it in|serts a |
|000009b0| 6e 65 77 6c 69 6e 65 20 | 63 68 61 72 61 63 74 65 |newline |characte|
|000009c0| 72 0a 74 6f 20 63 72 65 | 61 74 65 20 61 20 6c 69 |r.to cre|ate a li|
|000009d0| 6e 65 2c 20 61 6e 64 20 | 6d 6f 76 65 73 20 74 68 |ne, and |moves th|
|000009e0| 65 20 63 75 72 73 6f 72 | 20 74 6f 20 74 68 61 74 |e cursor| to that|
|000009f0| 20 6c 69 6e 65 2e 20 20 | 4f 74 68 65 72 77 69 73 | line.  |Otherwis|
|00000a00| 65 20 69 74 20 6d 6f 76 | 65 73 20 74 68 65 0a 63 |e it mov|es the.c|
|00000a10| 75 72 73 6f 72 20 74 6f | 20 74 68 65 20 65 6e 64 |ursor to| the end|
|00000a20| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 20 28 | of the |buffer (|
|00000a30| 69 66 20 61 6c 72 65 61 | 64 79 20 61 74 20 74 68 |if alrea|dy at th|
|00000a40| 65 20 65 6e 64 20 6f 66 | 20 74 68 65 20 62 75 66 |e end of| the buf|
|00000a50| 66 65 72 2c 20 61 6e 20 | 65 72 72 6f 72 0a 69 73 |fer, an |error.is|
|00000a60| 20 73 69 67 6e 61 6c 65 | 64 29 2e 0a 0a 54 68 65 | signale|d)...The|
|00000a70| 20 63 6f 6d 6d 61 6e 64 | 20 43 2d 78 20 43 2d 6e | command| C-x C-n|
|00000a80| 20 63 61 6e 20 62 65 20 | 75 73 65 64 20 74 6f 20 | can be |used to |
|00000a90| 63 72 65 61 74 65 0a 61 | 20 73 65 6d 69 70 65 72 |create.a| semiper|
|00000aa0| 6d 61 6e 65 6e 74 20 67 | 6f 61 6c 20 63 6f 6c 75 |manent g|oal colu|
|00000ab0| 6d 6e 20 74 6f 20 77 68 | 69 63 68 20 74 68 69 73 |mn to wh|ich this|
|00000ac0| 20 63 6f 6d 6d 61 6e 64 | 20 61 6c 77 61 79 73 20 | command| always |
|00000ad0| 6d 6f 76 65 73 2e 0a 54 | 68 65 6e 20 69 74 20 64 |moves..T|hen it d|
|00000ae0| 6f 65 73 20 6e 6f 74 20 | 74 72 79 20 74 6f 20 6d |oes not |try to m|
|00000af0| 6f 76 65 20 76 65 72 74 | 69 63 61 6c 6c 79 2e 20 |ove vert|ically. |
|00000b00| 20 54 68 69 73 20 67 6f | 61 6c 20 63 6f 6c 75 6d | This go|al colum|
|00000b10| 6e 20 69 73 20 73 74 6f | 72 65 64 0a 69 6e 20 60 |n is sto|red.in `|
|00000b20| 67 6f 61 6c 2d 63 6f 6c | 75 6d 6e 27 2c 20 77 68 |goal-col|umn', wh|
|00000b30| 69 63 68 20 69 73 20 6e | 69 6c 20 77 68 65 6e 20 |ich is n|il when |
|00000b40| 74 68 65 72 65 20 69 73 | 20 6e 6f 6e 65 2e 1f 0a |there is| none...|
|00000b50| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 65 78 74 2d |(defalia|s 'next-|
|00000b60| 6c 69 6e 65 2d 6d 61 72 | 6b 20 23 5b 28 26 6f 70 |line-mar|k #[(&op|
|00000b70| 74 69 6f 6e 61 6c 20 61 | 72 67 29 20 22 c0 20 88 |tional a|rg) ". .|
|00000b80| c1 5c 6e 21 88 c1 89 13 | 87 22 20 5b 65 6e 73 75 |.\n!....|." [ensu|
|00000b90| 72 65 2d 6d 61 72 6b 20 | 6e 65 78 74 2d 6c 69 6e |re-mark |next-lin|
|00000ba0| 65 20 61 72 67 20 74 68 | 69 73 2d 63 6f 6d 6d 61 |e arg th|is-comma|
|00000bb0| 6e 64 5d 20 32 20 28 23 | 24 20 2e 20 32 30 37 30 |nd] 2 (#|$ . 2070|
|00000bc0| 29 20 22 70 22 5d 29 0a | 23 40 31 38 32 20 45 6e |) "p"]).|#@182 En|
|00000bd0| 73 75 72 65 20 6d 61 72 | 6b 20 69 73 20 61 63 74 |sure mar|k is act|
|00000be0| 69 76 65 3b 20 6d 6f 76 | 65 20 70 6f 69 6e 74 20 |ive; mov|e point |
|00000bf0| 74 6f 20 65 6e 64 20 6f | 66 20 63 75 72 72 65 6e |to end o|f curren|
|00000c00| 74 20 6c 69 6e 65 2e 0a | 57 69 74 68 20 61 72 67 |t line..|With arg|
|00000c10| 75 6d 65 6e 74 20 41 52 | 47 20 6e 6f 74 20 6e 69 |ument AR|G not ni|
|00000c20| 6c 20 6f 72 20 31 2c 20 | 6d 6f 76 65 20 66 6f 72 |l or 1, |move for|
|00000c30| 77 61 72 64 20 41 52 47 | 20 2d 20 31 20 6c 69 6e |ward ARG| - 1 lin|
|00000c40| 65 73 20 66 69 72 73 74 | 2e 0a 49 66 20 73 63 61 |es first|..If sca|
|00000c50| 6e 20 72 65 61 63 68 65 | 73 20 65 6e 64 20 6f 66 |n reache|s end of|
|00000c60| 20 62 75 66 66 65 72 2c | 20 73 74 6f 70 20 74 68 | buffer,| stop th|
|00000c70| 65 72 65 20 77 69 74 68 | 6f 75 74 20 65 72 72 6f |ere with|out erro|
|00000c80| 72 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 65 |r...(def|alias 'e|
|00000c90| 6e 64 2d 6f 66 2d 6c 69 | 6e 65 2d 6d 61 72 6b 20 |nd-of-li|ne-mark |
|00000ca0| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 61 72 67 |#[(&opti|onal arg|
|00000cb0| 29 20 22 c0 20 88 09 7f | 88 c2 89 13 87 22 20 5b |) ". ...|....." [|
|00000cc0| 65 6e 73 75 72 65 2d 6d | 61 72 6b 20 61 72 67 20 |ensure-m|ark arg |
|00000cd0| 65 6e 64 2d 6f 66 2d 6c | 69 6e 65 20 74 68 69 73 |end-of-l|ine this|
|00000ce0| 2d 63 6f 6d 6d 61 6e 64 | 5d 20 32 20 28 23 24 20 |-command|] 2 (#$ |
|00000cf0| 2e 20 33 30 32 32 29 20 | 22 70 22 5d 29 0a 23 40 |. 3022) |"p"]).#@|
|00000d00| 32 35 32 20 45 6e 73 75 | 72 65 20 6d 61 72 6b 20 |252 Ensu|re mark |
|00000d10| 69 73 20 61 63 74 69 76 | 65 3b 20 73 63 72 6f 6c |is activ|e; scrol|
|00000d20| 6c 20 64 6f 77 6e 20 41 | 52 47 20 6c 69 6e 65 73 |l down A|RG lines|
|00000d30| 3b 20 6f 72 20 6e 65 61 | 72 20 66 75 6c 6c 20 73 |; or nea|r full s|
|00000d40| 63 72 65 65 6e 20 69 66 | 20 6e 6f 20 41 52 47 2e |creen if| no ARG.|
|00000d50| 0a 41 20 6e 65 61 72 20 | 66 75 6c 6c 20 73 63 72 |.A near |full scr|
|00000d60| 65 65 6e 20 69 73 20 60 | 6e 65 78 74 2d 73 63 72 |een is `|next-scr|
|00000d70| 65 65 6e 2d 63 6f 6e 74 | 65 78 74 2d 6c 69 6e 65 |een-cont|ext-line|
|00000d80| 73 27 20 6c 65 73 73 20 | 74 68 61 6e 20 61 20 66 |s' less |than a f|
|00000d90| 75 6c 6c 20 73 63 72 65 | 65 6e 2e 0a 4e 65 67 61 |ull scre|en..Nega|
|00000da0| 74 69 76 65 20 41 52 47 | 20 6d 65 61 6e 73 20 73 |tive ARG| means s|
|00000db0| 63 72 6f 6c 6c 20 75 70 | 77 61 72 64 2e 0a 57 68 |croll up|ward..Wh|
|00000dc0| 65 6e 20 63 61 6c 6c 69 | 6e 67 20 66 72 6f 6d 20 |en calli|ng from |
|00000dd0| 61 20 70 72 6f 67 72 61 | 6d 2c 20 73 75 70 70 6c |a progra|m, suppl|
|00000de0| 79 20 61 20 6e 75 6d 62 | 65 72 20 61 73 20 61 72 |y a numb|er as ar|
|00000df0| 67 75 6d 65 6e 74 20 6f | 72 20 6e 69 6c 2e 1f 0a |gument o|r nil...|
|00000e00| 28 64 65 66 61 6c 69 61 | 73 20 27 73 63 72 6f 6c |(defalia|s 'scrol|
|00000e10| 6c 2d 64 6f 77 6e 2d 6d | 61 72 6b 20 23 5b 28 26 |l-down-m|ark #[(&|
|00000e20| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|00000e30| 20 88 c1 5c 6e 21 87 22 | 20 5b 65 6e 73 75 72 65 | ..\n!."| [ensure|
|00000e40| 2d 6d 61 72 6b 20 73 63 | 72 6f 6c 6c 2d 64 6f 77 |-mark sc|roll-dow|
|00000e50| 6e 20 61 72 67 5d 20 32 | 20 28 23 24 20 2e 20 33 |n arg] 2| (#$ . 3|
|00000e60| 33 33 32 29 20 22 50 22 | 5d 29 0a 23 40 33 32 38 |332) "P"|]).#@328|
|00000e70| 20 45 6e 73 75 72 65 20 | 6d 61 72 6b 20 69 73 20 | Ensure |mark is |
|00000e80| 61 63 74 69 76 65 3b 20 | 6d 6f 76 65 20 70 6f 69 |active; |move poi|
|00000e90| 6e 74 20 74 6f 20 74 68 | 65 20 65 6e 64 20 6f 66 |nt to th|e end of|
|00000ea0| 20 74 68 65 20 62 75 66 | 66 65 72 2e 0a 57 69 74 | the buf|fer..Wit|
|00000eb0| 68 20 61 72 67 20 4e 2c | 20 70 75 74 20 70 6f 69 |h arg N,| put poi|
|00000ec0| 6e 74 20 4e 2f 31 30 20 | 6f 66 20 74 68 65 20 77 |nt N/10 |of the w|
|00000ed0| 61 79 20 66 72 6f 6d 20 | 74 68 65 20 65 6e 64 2e |ay from |the end.|
|00000ee0| 0a 0a 49 66 20 74 68 65 | 20 62 75 66 66 65 72 20 |..If the| buffer |
|00000ef0| 69 73 20 6e 61 72 72 6f | 77 65 64 2c 20 74 68 69 |is narro|wed, thi|
|00000f00| 73 20 63 6f 6d 6d 61 6e | 64 20 75 73 65 73 20 74 |s comman|d uses t|
|00000f10| 68 65 20 62 65 67 69 6e | 6e 69 6e 67 20 61 6e 64 |he begin|ning and|
|00000f20| 20 73 69 7a 65 0a 6f 66 | 20 74 68 65 20 61 63 63 | size.of| the acc|
|00000f30| 65 73 73 69 62 6c 65 20 | 70 61 72 74 20 6f 66 20 |essible |part of |
|00000f40| 74 68 65 20 62 75 66 66 | 65 72 2e 0a 0a 44 6f 6e |the buff|er...Don|
|00000f50| 27 74 20 75 73 65 20 74 | 68 69 73 20 63 6f 6d 6d |'t use t|his comm|
|00000f60| 61 6e 64 20 69 6e 20 4c | 69 73 70 20 70 72 6f 67 |and in L|isp prog|
|00000f70| 72 61 6d 73 21 0a 28 67 | 6f 74 6f 2d 63 68 61 72 |rams!.(g|oto-char|
|00000f80| 20 28 70 6f 69 6e 74 2d | 6d 61 78 29 29 20 69 73 | (point-|max)) is|
|00000f90| 20 66 61 73 74 65 72 20 | 61 6e 64 20 61 76 6f 69 | faster |and avoi|
|00000fa0| 64 73 20 63 6c 6f 62 62 | 65 72 69 6e 67 20 74 68 |ds clobb|ering th|
|00000fb0| 65 20 6d 61 72 6b 2e 1f | 0a 28 64 65 66 61 6c 69 |e mark..|.(defali|
|00000fc0| 61 73 20 27 65 6e 64 2d | 6f 66 2d 62 75 66 66 65 |as 'end-|of-buffe|
|00000fd0| 72 2d 6d 61 72 6b 20 23 | 5b 28 26 6f 70 74 69 6f |r-mark #|[(&optio|
|00000fe0| 6e 61 6c 20 61 72 67 29 | 20 22 c0 20 88 64 65 5a |nal arg)| ". .deZ|
|00000ff0| 19 5c 6e 83 27 00 64 09 | c3 56 83 1c 00 c4 5c 6e |.\n.'.d.|.V....\n|
|00001000| 21 09 c5 a5 5f 82 23 00 | 09 c4 5c 6e 21 5f c5 a5 |!..._.#.|..\n!_..|
|00001010| 5a 82 28 00 64 62 88 29 | 5c 6e 83 32 00 c6 79 87 |Z.(.db.)|\n.2..y.|
|00001020| 60 1e 07 8a c8 20 62 88 | c9 ca 20 21 88 60 0e 07 |`.... b.|.. !.`..|
|00001030| 57 2a 85 4e 00 cb 60 21 | 88 cc cd 21 87 22 20 5b |W*.N..`!|...!." [|
|00001040| 65 6e 73 75 72 65 2d 6d | 61 72 6b 20 73 69 7a 65 |ensure-m|ark size|
|00001050| 20 61 72 67 20 31 30 30 | 30 30 20 70 72 65 66 69 | arg 100|00 prefi|
|00001060| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|00001070| 31 30 20 31 20 6f 6c 64 | 2d 70 6f 69 6e 74 20 77 |10 1 old|-point w|
|00001080| 69 6e 64 6f 77 2d 73 74 | 61 72 74 20 76 65 72 74 |indow-st|art vert|
|00001090| 69 63 61 6c 2d 6d 6f 74 | 69 6f 6e 20 77 69 6e 64 |ical-mot|ion wind|
|000010a0| 6f 77 2d 68 65 69 67 68 | 74 20 6f 76 65 72 6c 61 |ow-heigh|t overla|
|000010b0| 79 2d 72 65 63 65 6e 74 | 65 72 20 72 65 63 65 6e |y-recent|er recen|
|000010c0| 74 65 72 20 2d 33 5d 20 | 34 20 28 23 24 20 2e 20 |ter -3] |4 (#$ . |
|000010d0| 33 36 39 37 29 20 22 50 | 22 5d 29 0a 23 40 31 32 |3697) "P|"]).#@12|
|000010e0| 34 20 44 65 61 63 74 69 | 76 61 74 65 20 6d 61 72 |4 Deacti|vate mar|
|000010f0| 6b 3b 20 6d 6f 76 65 20 | 70 6f 69 6e 74 20 72 69 |k; move |point ri|
|00001100| 67 68 74 20 41 52 47 20 | 63 68 61 72 61 63 74 65 |ght ARG |characte|
|00001110| 72 73 20 28 6c 65 66 74 | 20 69 66 20 41 52 47 20 |rs (left| if ARG |
|00001120| 6e 65 67 61 74 69 76 65 | 29 2e 0a 4f 6e 20 72 65 |negative|)..On re|
|00001130| 61 63 68 69 6e 67 20 65 | 6e 64 20 6f 66 20 62 75 |aching e|nd of bu|
|00001140| 66 66 65 72 2c 20 73 74 | 6f 70 20 61 6e 64 20 73 |ffer, st|op and s|
|00001150| 69 67 6e 61 6c 20 65 72 | 72 6f 72 2e 1f 0a 28 64 |ignal er|ror...(d|
|00001160| 65 66 61 6c 69 61 73 20 | 27 66 6f 72 77 61 72 64 |efalias |'forward|
|00001170| 2d 63 68 61 72 2d 6e 6f | 6d 61 72 6b 20 23 5b 28 |-char-no|mark #[(|
|00001180| 26 6f 70 74 69 6f 6e 61 | 6c 20 61 72 67 29 20 22 |&optiona|l arg) "|
|00001190| c0 11 5c 6e 75 87 22 20 | 5b 6e 69 6c 20 6d 61 72 |..\nu." |[nil mar|
|000011a0| 6b 2d 61 63 74 69 76 65 | 20 61 72 67 5d 20 31 20 |k-active| arg] 1 |
|000011b0| 28 23 24 20 2e 20 34 33 | 32 32 29 20 22 70 22 5d |(#$ . 43|22) "p"]|
|000011c0| 29 0a 23 40 31 37 34 20 | 44 65 61 63 74 69 76 61 |).#@174 |Deactiva|
|000011d0| 74 65 20 6d 61 72 6b 3b | 20 6d 6f 76 65 20 70 6f |te mark;| move po|
|000011e0| 69 6e 74 20 72 69 67 68 | 74 20 41 52 47 20 77 6f |int righ|t ARG wo|
|000011f0| 72 64 73 20 28 62 61 63 | 6b 77 61 72 64 20 69 66 |rds (bac|kward if|
|00001200| 20 41 52 47 20 69 73 20 | 6e 65 67 61 74 69 76 65 | ARG is |negative|
|00001210| 29 2e 0a 4e 6f 72 6d 61 | 6c 6c 79 20 72 65 74 75 |)..Norma|lly retu|
|00001220| 72 6e 73 20 74 2e 0a 49 | 66 20 61 6e 20 65 64 67 |rns t..I|f an edg|
|00001230| 65 20 6f 66 20 74 68 65 | 20 62 75 66 66 65 72 20 |e of the| buffer |
|00001240| 69 73 20 72 65 61 63 68 | 65 64 2c 20 70 6f 69 6e |is reach|ed, poin|
|00001250| 74 20 69 73 20 6c 65 66 | 74 20 74 68 65 72 65 0a |t is lef|t there.|
|00001260| 61 6e 64 20 6e 69 6c 20 | 69 73 20 72 65 74 75 72 |and nil |is retur|
|00001270| 6e 65 64 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |ned...(d|efalias |
|00001280| 27 66 6f 72 77 61 72 64 | 2d 77 6f 72 64 2d 6e 6f |'forward|-word-no|
|00001290| 6d 61 72 6b 20 23 5b 28 | 26 6f 70 74 69 6f 6e 61 |mark #[(|&optiona|
|000012a0| 6c 20 61 72 67 29 20 22 | c0 11 5c 6e 76 87 22 20 |l arg) "|..\nv." |
|000012b0| 5b 6e 69 6c 20 6d 61 72 | 6b 2d 61 63 74 69 76 65 |[nil mar|k-active|
|000012c0| 20 61 72 67 5d 20 31 20 | 28 23 24 20 2e 20 34 35 | arg] 1 |(#$ . 45|
|000012d0| 35 32 29 20 22 70 22 5d | 29 0a 23 40 34 32 37 20 |52) "p"]|).#@427 |
|000012e0| 44 65 61 63 74 69 76 61 | 74 65 20 6d 61 72 6b 3b |Deactiva|te mark;|
|000012f0| 20 6d 6f 76 65 20 66 6f | 72 77 61 72 64 20 74 6f | move fo|rward to|
|00001300| 20 65 6e 64 20 6f 66 20 | 70 61 72 61 67 72 61 70 | end of |paragrap|
|00001310| 68 2e 0a 57 69 74 68 20 | 61 72 67 20 4e 2c 20 64 |h..With |arg N, d|
|00001320| 6f 20 69 74 20 4e 20 74 | 69 6d 65 73 3b 20 6e 65 |o it N t|imes; ne|
|00001330| 67 61 74 69 76 65 20 61 | 72 67 20 2d 4e 20 6d 65 |gative a|rg -N me|
|00001340| 61 6e 73 20 6d 6f 76 65 | 20 62 61 63 6b 77 61 72 |ans move| backwar|
|00001350| 64 20 4e 20 70 61 72 61 | 67 72 61 70 68 73 2e 0a |d N para|graphs..|
|00001360| 0a 41 20 6c 69 6e 65 20 | 77 68 69 63 68 20 60 70 |.A line |which `p|
|00001370| 61 72 61 67 72 61 70 68 | 2d 73 74 61 72 74 27 20 |aragraph|-start' |
|00001380| 6d 61 74 63 68 65 73 20 | 65 69 74 68 65 72 20 73 |matches |either s|
|00001390| 65 70 61 72 61 74 65 73 | 20 70 61 72 61 67 72 61 |eparates| paragra|
|000013a0| 70 68 73 0a 28 69 66 20 | 60 70 61 72 61 67 72 61 |phs.(if |`paragra|
|000013b0| 70 68 2d 73 65 70 61 72 | 61 74 65 27 20 6d 61 74 |ph-separ|ate' mat|
|000013c0| 63 68 65 73 20 69 74 20 | 61 6c 73 6f 29 20 6f 72 |ches it |also) or|
|000013d0| 20 69 73 20 74 68 65 20 | 66 69 72 73 74 20 6c 69 | is the |first li|
|000013e0| 6e 65 20 6f 66 20 61 20 | 70 61 72 61 67 72 61 70 |ne of a |paragrap|
|000013f0| 68 2e 0a 41 20 70 61 72 | 61 67 72 61 70 68 20 65 |h..A par|agraph e|
|00001400| 6e 64 20 69 73 20 74 68 | 65 20 62 65 67 69 6e 6e |nd is th|e beginn|
|00001410| 69 6e 67 20 6f 66 20 61 | 20 6c 69 6e 65 20 77 68 |ing of a| line wh|
|00001420| 69 63 68 20 69 73 20 6e | 6f 74 20 70 61 72 74 20 |ich is n|ot part |
|00001430| 6f 66 20 74 68 65 20 70 | 61 72 61 67 72 61 70 68 |of the p|aragraph|
|00001440| 0a 74 6f 20 77 68 69 63 | 68 20 74 68 65 20 65 6e |.to whic|h the en|
|00001450| 64 20 6f 66 20 74 68 65 | 20 70 72 65 76 69 6f 75 |d of the| previou|
|00001460| 73 20 6c 69 6e 65 20 62 | 65 6c 6f 6e 67 73 2c 20 |s line b|elongs, |
|00001470| 6f 72 20 74 68 65 20 65 | 6e 64 20 6f 66 20 74 68 |or the e|nd of th|
|00001480| 65 20 62 75 66 66 65 72 | 2e 1f 0a 28 64 65 66 61 |e buffer|...(defa|
|00001490| 6c 69 61 73 20 27 66 6f | 72 77 61 72 64 2d 70 61 |lias 'fo|rward-pa|
|000014a0| 72 61 67 72 61 70 68 2d | 6e 6f 6d 61 72 6b 20 23 |ragraph-|nomark #|
|000014b0| 5b 28 26 6f 70 74 69 6f | 6e 61 6c 20 61 72 67 29 |[(&optio|nal arg)|
|000014c0| 20 22 c0 11 c2 0b 21 87 | 22 20 5b 6e 69 6c 20 6d | "....!.|" [nil m|
|000014d0| 61 72 6b 2d 61 63 74 69 | 76 65 20 66 6f 72 77 61 |ark-acti|ve forwa|
|000014e0| 72 64 2d 70 61 72 61 67 | 72 61 70 68 20 61 72 67 |rd-parag|raph arg|
|000014f0| 5d 20 32 20 28 23 24 20 | 2e 20 34 38 33 32 29 20 |] 2 (#$ |. 4832) |
|00001500| 22 70 22 5d 29 0a 23 40 | 38 32 30 20 44 65 61 63 |"p"]).#@|820 Deac|
|00001510| 74 69 76 61 74 65 20 6d | 61 72 6b 3b 20 6d 6f 76 |tivate m|ark; mov|
|00001520| 65 20 63 75 72 73 6f 72 | 20 76 65 72 74 69 63 61 |e cursor| vertica|
|00001530| 6c 6c 79 20 64 6f 77 6e | 20 41 52 47 20 6c 69 6e |lly down| ARG lin|
|00001540| 65 73 2e 0a 49 66 20 74 | 68 65 72 65 20 69 73 20 |es..If t|here is |
|00001550| 6e 6f 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |no chara|cter in |
|00001560| 74 68 65 20 74 61 72 67 | 65 74 20 6c 69 6e 65 20 |the targ|et line |
|00001570| 65 78 61 63 74 6c 79 20 | 75 6e 64 65 72 20 74 68 |exactly |under th|
|00001580| 65 20 63 75 72 72 65 6e | 74 20 63 6f 6c 75 6d 6e |e curren|t column|
|00001590| 2c 0a 74 68 65 20 63 75 | 72 73 6f 72 20 69 73 20 |,.the cu|rsor is |
|000015a0| 70 6f 73 69 74 69 6f 6e | 65 64 20 61 66 74 65 72 |position|ed after|
|000015b0| 20 74 68 65 20 63 68 61 | 72 61 63 74 65 72 20 69 | the cha|racter i|
|000015c0| 6e 20 74 68 61 74 20 6c | 69 6e 65 20 77 68 69 63 |n that l|ine whic|
|000015d0| 68 20 73 70 61 6e 73 20 | 74 68 69 73 0a 63 6f 6c |h spans |this.col|
|000015e0| 75 6d 6e 2c 20 6f 72 20 | 61 74 20 74 68 65 20 65 |umn, or |at the e|
|000015f0| 6e 64 20 6f 66 20 74 68 | 65 20 6c 69 6e 65 20 69 |nd of th|e line i|
|00001600| 66 20 69 74 20 69 73 20 | 6e 6f 74 20 6c 6f 6e 67 |f it is |not long|
|00001610| 20 65 6e 6f 75 67 68 2e | 0a 49 66 20 74 68 65 72 | enough.|.If ther|
|00001620| 65 20 69 73 20 6e 6f 20 | 6c 69 6e 65 20 69 6e 20 |e is no |line in |
|00001630| 74 68 65 20 62 75 66 66 | 65 72 20 61 66 74 65 72 |the buff|er after|
|00001640| 20 74 68 69 73 20 6f 6e | 65 2c 20 62 65 68 61 76 | this on|e, behav|
|00001650| 69 6f 72 20 64 65 70 65 | 6e 64 73 20 6f 6e 20 74 |ior depe|nds on t|
|00001660| 68 65 0a 76 61 6c 75 65 | 20 6f 66 20 60 6e 65 78 |he.value| of `nex|
|00001670| 74 2d 6c 69 6e 65 2d 61 | 64 64 2d 6e 65 77 6c 69 |t-line-a|dd-newli|
|00001680| 6e 65 73 27 2e 20 20 49 | 66 20 6e 6f 6e 2d 6e 69 |nes'.  I|f non-ni|
|00001690| 6c 2c 20 69 74 20 69 6e | 73 65 72 74 73 20 61 20 |l, it in|serts a |
|000016a0| 6e 65 77 6c 69 6e 65 20 | 63 68 61 72 61 63 74 65 |newline |characte|
|000016b0| 72 0a 74 6f 20 63 72 65 | 61 74 65 20 61 20 6c 69 |r.to cre|ate a li|
|000016c0| 6e 65 2c 20 61 6e 64 20 | 6d 6f 76 65 73 20 74 68 |ne, and |moves th|
|000016d0| 65 20 63 75 72 73 6f 72 | 20 74 6f 20 74 68 61 74 |e cursor| to that|
|000016e0| 20 6c 69 6e 65 2e 20 20 | 4f 74 68 65 72 77 69 73 | line.  |Otherwis|
|000016f0| 65 20 69 74 20 6d 6f 76 | 65 73 20 74 68 65 0a 63 |e it mov|es the.c|
|00001700| 75 72 73 6f 72 20 74 6f | 20 74 68 65 20 65 6e 64 |ursor to| the end|
|00001710| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 20 28 | of the |buffer (|
|00001720| 69 66 20 61 6c 72 65 61 | 64 79 20 61 74 20 74 68 |if alrea|dy at th|
|00001730| 65 20 65 6e 64 20 6f 66 | 20 74 68 65 20 62 75 66 |e end of| the buf|
|00001740| 66 65 72 2c 20 61 6e 20 | 65 72 72 6f 72 0a 69 73 |fer, an |error.is|
|00001750| 20 73 69 67 6e 61 6c 65 | 64 29 2e 0a 0a 54 68 65 | signale|d)...The|
|00001760| 20 63 6f 6d 6d 61 6e 64 | 20 43 2d 78 20 43 2d 6e | command| C-x C-n|
|00001770| 20 63 61 6e 20 62 65 20 | 75 73 65 64 20 74 6f 20 | can be |used to |
|00001780| 63 72 65 61 74 65 0a 61 | 20 73 65 6d 69 70 65 72 |create.a| semiper|
|00001790| 6d 61 6e 65 6e 74 20 67 | 6f 61 6c 20 63 6f 6c 75 |manent g|oal colu|
|000017a0| 6d 6e 20 74 6f 20 77 68 | 69 63 68 20 74 68 69 73 |mn to wh|ich this|
|000017b0| 20 63 6f 6d 6d 61 6e 64 | 20 61 6c 77 61 79 73 20 | command| always |
|000017c0| 6d 6f 76 65 73 2e 0a 54 | 68 65 6e 20 69 74 20 64 |moves..T|hen it d|
|000017d0| 6f 65 73 20 6e 6f 74 20 | 74 72 79 20 74 6f 20 6d |oes not |try to m|
|000017e0| 6f 76 65 20 76 65 72 74 | 69 63 61 6c 6c 79 2e 20 |ove vert|ically. |
|000017f0| 20 54 68 69 73 20 67 6f | 61 6c 20 63 6f 6c 75 6d | This go|al colum|
|00001800| 6e 20 69 73 20 73 74 6f | 72 65 64 0a 69 6e 20 60 |n is sto|red.in `|
|00001810| 67 6f 61 6c 2d 63 6f 6c | 75 6d 6e 27 2c 20 77 68 |goal-col|umn', wh|
|00001820| 69 63 68 20 69 73 20 6e | 69 6c 20 77 68 65 6e 20 |ich is n|il when |
|00001830| 74 68 65 72 65 20 69 73 | 20 6e 6f 6e 65 2e 1f 0a |there is| none...|
|00001840| 28 64 65 66 61 6c 69 61 | 73 20 27 6e 65 78 74 2d |(defalia|s 'next-|
|00001850| 6c 69 6e 65 2d 6e 6f 6d | 61 72 6b 20 23 5b 28 26 |line-nom|ark #[(&|
|00001860| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|00001870| 11 c2 0b 21 88 c2 89 14 | 87 22 20 5b 6e 69 6c 20 |...!....|." [nil |
|00001880| 6d 61 72 6b 2d 61 63 74 | 69 76 65 20 6e 65 78 74 |mark-act|ive next|
|00001890| 2d 6c 69 6e 65 20 61 72 | 67 20 74 68 69 73 2d 63 |-line ar|g this-c|
|000018a0| 6f 6d 6d 61 6e 64 5d 20 | 32 20 28 23 24 20 2e 20 |ommand] |2 (#$ . |
|000018b0| 35 33 38 38 29 20 22 70 | 22 5d 29 0a 23 40 31 37 |5388) "p|"]).#@17|
|000018c0| 36 20 44 65 61 63 74 69 | 76 61 74 65 20 6d 61 72 |6 Deacti|vate mar|
|000018d0| 6b 3b 20 6d 6f 76 65 20 | 70 6f 69 6e 74 20 74 6f |k; move |point to|
|000018e0| 20 65 6e 64 20 6f 66 20 | 63 75 72 72 65 6e 74 20 | end of |current |
|000018f0| 6c 69 6e 65 2e 0a 57 69 | 74 68 20 61 72 67 75 6d |line..Wi|th argum|
|00001900| 65 6e 74 20 41 52 47 20 | 6e 6f 74 20 6e 69 6c 20 |ent ARG |not nil |
|00001910| 6f 72 20 31 2c 20 6d 6f | 76 65 20 66 6f 72 77 61 |or 1, mo|ve forwa|
|00001920| 72 64 20 41 52 47 20 2d | 20 31 20 6c 69 6e 65 73 |rd ARG -| 1 lines|
|00001930| 20 66 69 72 73 74 2e 0a | 49 66 20 73 63 61 6e 20 | first..|If scan |
|00001940| 72 65 61 63 68 65 73 20 | 65 6e 64 20 6f 66 20 62 |reaches |end of b|
|00001950| 75 66 66 65 72 2c 20 73 | 74 6f 70 20 74 68 65 72 |uffer, s|top ther|
|00001960| 65 20 77 69 74 68 6f 75 | 74 20 65 72 72 6f 72 2e |e withou|t error.|
|00001970| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 65 6e 64 |..(defal|ias 'end|
|00001980| 2d 6f 66 2d 6c 69 6e 65 | 2d 6e 6f 6d 61 72 6b 20 |-of-line|-nomark |
|00001990| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 61 72 67 |#[(&opti|onal arg|
|000019a0| 29 20 22 c0 11 5c 6e 7f | 88 c3 89 14 87 22 20 5b |) "..\n.|....." [|
|000019b0| 6e 69 6c 20 6d 61 72 6b | 2d 61 63 74 69 76 65 20 |nil mark|-active |
|000019c0| 61 72 67 20 65 6e 64 2d | 6f 66 2d 6c 69 6e 65 20 |arg end-|of-line |
|000019d0| 74 68 69 73 2d 63 6f 6d | 6d 61 6e 64 5d 20 32 20 |this-com|mand] 2 |
|000019e0| 28 23 24 20 2e 20 36 33 | 33 38 29 20 22 70 22 5d |(#$ . 63|38) "p"]|
|000019f0| 29 0a 23 40 32 34 36 20 | 44 65 61 63 74 69 76 61 |).#@246 |Deactiva|
|00001a00| 74 65 20 6d 61 72 6b 3b | 20 73 63 72 6f 6c 6c 20 |te mark;| scroll |
|00001a10| 64 6f 77 6e 20 41 52 47 | 20 6c 69 6e 65 73 3b 20 |down ARG| lines; |
|00001a20| 6f 72 20 6e 65 61 72 20 | 66 75 6c 6c 20 73 63 72 |or near |full scr|
|00001a30| 65 65 6e 20 69 66 20 6e | 6f 20 41 52 47 2e 0a 41 |een if n|o ARG..A|
|00001a40| 20 6e 65 61 72 20 66 75 | 6c 6c 20 73 63 72 65 65 | near fu|ll scree|
|00001a50| 6e 20 69 73 20 60 6e 65 | 78 74 2d 73 63 72 65 65 |n is `ne|xt-scree|
|00001a60| 6e 2d 63 6f 6e 74 65 78 | 74 2d 6c 69 6e 65 73 27 |n-contex|t-lines'|
|00001a70| 20 6c 65 73 73 20 74 68 | 61 6e 20 61 20 66 75 6c | less th|an a ful|
|00001a80| 6c 20 73 63 72 65 65 6e | 2e 0a 4e 65 67 61 74 69 |l screen|..Negati|
|00001a90| 76 65 20 41 52 47 20 6d | 65 61 6e 73 20 73 63 72 |ve ARG m|eans scr|
|00001aa0| 6f 6c 6c 20 75 70 77 61 | 72 64 2e 0a 57 68 65 6e |oll upwa|rd..When|
|00001ab0| 20 63 61 6c 6c 69 6e 67 | 20 66 72 6f 6d 20 61 20 | calling| from a |
|00001ac0| 70 72 6f 67 72 61 6d 2c | 20 73 75 70 70 6c 79 20 |program,| supply |
|00001ad0| 61 20 6e 75 6d 62 65 72 | 20 61 73 20 61 72 67 75 |a number| as argu|
|00001ae0| 6d 65 6e 74 20 6f 72 20 | 6e 69 6c 2e 1f 0a 28 64 |ment or |nil...(d|
|00001af0| 65 66 61 6c 69 61 73 20 | 27 73 63 72 6f 6c 6c 2d |efalias |'scroll-|
|00001b00| 64 6f 77 6e 2d 6e 6f 6d | 61 72 6b 20 23 5b 28 26 |down-nom|ark #[(&|
|00001b10| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|00001b20| 11 c2 0b 21 87 22 20 5b | 6e 69 6c 20 6d 61 72 6b |...!." [|nil mark|
|00001b30| 2d 61 63 74 69 76 65 20 | 73 63 72 6f 6c 6c 2d 64 |-active |scroll-d|
|00001b40| 6f 77 6e 20 61 72 67 5d | 20 32 20 28 23 24 20 2e |own arg]| 2 (#$ .|
|00001b50| 20 36 36 34 38 29 20 22 | 50 22 5d 29 0a 23 40 33 | 6648) "|P"]).#@3|
|00001b60| 32 32 20 44 65 61 63 74 | 69 76 61 74 65 20 6d 61 |22 Deact|ivate ma|
|00001b70| 72 6b 3b 20 6d 6f 76 65 | 20 70 6f 69 6e 74 20 74 |rk; move| point t|
|00001b80| 6f 20 74 68 65 20 65 6e | 64 20 6f 66 20 74 68 65 |o the en|d of the|
|00001b90| 20 62 75 66 66 65 72 2e | 0a 57 69 74 68 20 61 72 | buffer.|.With ar|
|00001ba0| 67 20 4e 2c 20 70 75 74 | 20 70 6f 69 6e 74 20 4e |g N, put| point N|
|00001bb0| 2f 31 30 20 6f 66 20 74 | 68 65 20 77 61 79 20 66 |/10 of t|he way f|
|00001bc0| 72 6f 6d 20 74 68 65 20 | 65 6e 64 2e 0a 0a 49 66 |rom the |end...If|
|00001bd0| 20 74 68 65 20 62 75 66 | 66 65 72 20 69 73 20 6e | the buf|fer is n|
|00001be0| 61 72 72 6f 77 65 64 2c | 20 74 68 69 73 20 63 6f |arrowed,| this co|
|00001bf0| 6d 6d 61 6e 64 20 75 73 | 65 73 20 74 68 65 20 62 |mmand us|es the b|
|00001c00| 65 67 69 6e 6e 69 6e 67 | 20 61 6e 64 20 73 69 7a |eginning| and siz|
|00001c10| 65 0a 6f 66 20 74 68 65 | 20 61 63 63 65 73 73 69 |e.of the| accessi|
|00001c20| 62 6c 65 20 70 61 72 74 | 20 6f 66 20 74 68 65 20 |ble part| of the |
|00001c30| 62 75 66 66 65 72 2e 0a | 0a 44 6f 6e 27 74 20 75 |buffer..|.Don't u|
|00001c40| 73 65 20 74 68 69 73 20 | 63 6f 6d 6d 61 6e 64 20 |se this |command |
|00001c50| 69 6e 20 4c 69 73 70 20 | 70 72 6f 67 72 61 6d 73 |in Lisp |programs|
|00001c60| 21 0a 28 67 6f 74 6f 2d | 63 68 61 72 20 28 70 6f |!.(goto-|char (po|
|00001c70| 69 6e 74 2d 6d 61 78 29 | 29 20 69 73 20 66 61 73 |int-max)|) is fas|
|00001c80| 74 65 72 20 61 6e 64 20 | 61 76 6f 69 64 73 20 63 |ter and |avoids c|
|00001c90| 6c 6f 62 62 65 72 69 6e | 67 20 74 68 65 20 6d 61 |lobberin|g the ma|
|00001ca0| 72 6b 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |rk...(de|falias '|
|00001cb0| 65 6e 64 2d 6f 66 2d 62 | 75 66 66 65 72 2d 6e 6f |end-of-b|uffer-no|
|00001cc0| 6d 61 72 6b 20 23 5b 28 | 26 6f 70 74 69 6f 6e 61 |mark #[(|&optiona|
|00001cd0| 6c 20 61 72 67 29 20 22 | c0 11 64 65 5a 1a 0b 83 |l arg) "|..deZ...|
|00001ce0| 26 00 64 5c 6e c4 56 83 | 1b 00 c5 0b 21 5c 6e c6 |&.d\n.V.|....!\n.|
|00001cf0| a5 5f 82 5c 22 00 5c 6e | c5 0b 21 5f c6 a5 5a 82 |._.\".\n|..!_..Z.|
|00001d00| 27 00 64 62 88 29 0b 83 | 31 00 c7 79 87 60 1e 08 |'.db.)..|1..y.`..|
|00001d10| 8a c9 20 62 88 ca cb 20 | 21 88 60 0e 08 57 2a 85 |.. b... |!.`..W*.|
|00001d20| 4d 00 cc 60 21 88 cd ce | 21 87 22 20 5b 6e 69 6c |M..`!...|!." [nil|
|00001d30| 20 6d 61 72 6b 2d 61 63 | 74 69 76 65 20 73 69 7a | mark-ac|tive siz|
|00001d40| 65 20 61 72 67 20 31 30 | 30 30 30 20 70 72 65 66 |e arg 10|000 pref|
|00001d50| 69 78 2d 6e 75 6d 65 72 | 69 63 2d 76 61 6c 75 65 |ix-numer|ic-value|
|00001d60| 20 31 30 20 31 20 6f 6c | 64 2d 70 6f 69 6e 74 20 | 10 1 ol|d-point |
|00001d70| 77 69 6e 64 6f 77 2d 73 | 74 61 72 74 20 76 65 72 |window-s|tart ver|
|00001d80| 74 69 63 61 6c 2d 6d 6f | 74 69 6f 6e 20 77 69 6e |tical-mo|tion win|
|00001d90| 64 6f 77 2d 68 65 69 67 | 68 74 20 6f 76 65 72 6c |dow-heig|ht overl|
|00001da0| 61 79 2d 72 65 63 65 6e | 74 65 72 20 72 65 63 65 |ay-recen|ter rece|
|00001db0| 6e 74 65 72 20 2d 33 5d | 20 34 20 28 23 24 20 2e |nter -3]| 4 (#$ .|
|00001dc0| 20 37 30 31 31 29 20 22 | 50 22 5d 29 0a 23 40 31 | 7011) "|P"]).#@1|
|00001dd0| 35 30 20 45 6e 73 75 72 | 65 20 6d 61 72 6b 20 69 |50 Ensur|e mark i|
|00001de0| 73 20 61 63 74 69 76 65 | 3b 20 6d 6f 76 65 20 70 |s active|; move p|
|00001df0| 6f 69 6e 74 20 6c 65 66 | 74 20 41 52 47 20 63 68 |oint lef|t ARG ch|
|00001e00| 61 72 61 63 74 65 72 73 | 20 28 72 69 67 68 74 20 |aracters| (right |
|00001e10| 69 66 20 41 52 47 20 6e | 65 67 61 74 69 76 65 29 |if ARG n|egative)|
|00001e20| 2e 0a 4f 6e 20 61 74 74 | 65 6d 70 74 20 74 6f 20 |..On att|empt to |
|00001e30| 70 61 73 73 20 62 65 67 | 69 6e 6e 69 6e 67 20 6f |pass beg|inning o|
|00001e40| 72 20 65 6e 64 20 6f 66 | 20 62 75 66 66 65 72 2c |r end of| buffer,|
|00001e50| 20 73 74 6f 70 20 61 6e | 64 20 73 69 67 6e 61 6c | stop an|d signal|
|00001e60| 20 65 72 72 6f 72 2e 1f | 0a 28 64 65 66 61 6c 69 | error..|.(defali|
|00001e70| 61 73 20 27 62 61 63 6b | 77 61 72 64 2d 63 68 61 |as 'back|ward-cha|
|00001e80| 72 2d 6d 61 72 6b 20 23 | 5b 28 26 6f 70 74 69 6f |r-mark #|[(&optio|
|00001e90| 6e 61 6c 20 61 72 67 29 | 20 22 c0 20 88 c1 5c 6e |nal arg)| ". ..\n|
|00001ea0| 21 87 22 20 5b 65 6e 73 | 75 72 65 2d 6d 61 72 6b |!." [ens|ure-mark|
|00001eb0| 20 62 61 63 6b 77 61 72 | 64 2d 63 68 61 72 20 61 | backwar|d-char a|
|00001ec0| 72 67 5d 20 32 20 28 23 | 24 20 2e 20 37 36 33 35 |rg] 2 (#|$ . 7635|
|00001ed0| 29 20 22 70 22 5d 29 0a | 23 40 31 31 36 20 45 6e |) "p"]).|#@116 En|
|00001ee0| 73 75 72 65 20 6d 61 72 | 6b 20 69 73 20 61 63 74 |sure mar|k is act|
|00001ef0| 69 76 65 3b 20 6d 6f 76 | 65 20 62 61 63 6b 77 61 |ive; mov|e backwa|
|00001f00| 72 64 20 75 6e 74 69 6c | 20 65 6e 63 6f 75 6e 74 |rd until| encount|
|00001f10| 65 72 69 6e 67 20 74 68 | 65 20 65 6e 64 20 6f 66 |ering th|e end of|
|00001f20| 20 61 20 77 6f 72 64 2e | 0a 57 69 74 68 20 61 72 | a word.|.With ar|
|00001f30| 67 75 6d 65 6e 74 2c 20 | 64 6f 20 74 68 69 73 20 |gument, |do this |
|00001f40| 74 68 61 74 20 6d 61 6e | 79 20 74 69 6d 65 73 2e |that man|y times.|
|00001f50| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 62 61 63 |..(defal|ias 'bac|
|00001f60| 6b 77 61 72 64 2d 77 6f | 72 64 2d 6d 61 72 6b 20 |kward-wo|rd-mark |
|00001f70| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 61 72 67 |#[(&opti|onal arg|
|00001f80| 29 20 22 c0 20 88 c1 5c | 6e 21 87 22 20 5b 65 6e |) ". ..\|n!." [en|
|00001f90| 73 75 72 65 2d 6d 61 72 | 6b 20 62 61 63 6b 77 61 |sure-mar|k backwa|
|00001fa0| 72 64 2d 77 6f 72 64 20 | 61 72 67 5d 20 32 20 28 |rd-word |arg] 2 (|
|00001fb0| 23 24 20 2e 20 37 39 30 | 32 29 20 22 70 22 5d 29 |#$ . 790|2) "p"])|
|00001fc0| 0a 23 40 34 35 30 20 45 | 6e 73 75 72 65 20 6d 61 |.#@450 E|nsure ma|
|00001fd0| 72 6b 20 69 73 20 61 63 | 74 69 76 65 3b 20 6d 6f |rk is ac|tive; mo|
|00001fe0| 76 65 20 62 61 63 6b 77 | 61 72 64 20 74 6f 20 73 |ve backw|ard to s|
|00001ff0| 74 61 72 74 20 6f 66 20 | 70 61 72 61 67 72 61 70 |tart of |paragrap|
|00002000| 68 2e 0a 57 69 74 68 20 | 61 72 67 20 4e 2c 20 64 |h..With |arg N, d|
|00002010| 6f 20 69 74 20 4e 20 74 | 69 6d 65 73 3b 20 6e 65 |o it N t|imes; ne|
|00002020| 67 61 74 69 76 65 20 61 | 72 67 20 2d 4e 20 6d 65 |gative a|rg -N me|
|00002030| 61 6e 73 20 6d 6f 76 65 | 20 66 6f 72 77 61 72 64 |ans move| forward|
|00002040| 20 4e 20 70 61 72 61 67 | 72 61 70 68 73 2e 0a 0a | N parag|raphs...|
|00002050| 41 20 70 61 72 61 67 72 | 61 70 68 20 73 74 61 72 |A paragr|aph star|
|00002060| 74 20 69 73 20 74 68 65 | 20 62 65 67 69 6e 6e 69 |t is the| beginni|
|00002070| 6e 67 20 6f 66 20 61 20 | 6c 69 6e 65 20 77 68 69 |ng of a |line whi|
|00002080| 63 68 20 69 73 20 61 0a | 60 66 69 72 73 74 2d 6c |ch is a.|`first-l|
|00002090| 69 6e 65 2d 6f 66 2d 70 | 61 72 61 67 72 61 70 68 |ine-of-p|aragraph|
|000020a0| 27 20 6f 72 20 77 68 69 | 63 68 20 69 73 20 6f 72 |' or whi|ch is or|
|000020b0| 64 69 6e 61 72 79 20 74 | 65 78 74 20 61 6e 64 20 |dinary t|ext and |
|000020c0| 66 6f 6c 6c 6f 77 73 20 | 61 0a 70 61 72 61 67 72 |follows |a.paragr|
|000020d0| 61 70 68 2d 73 65 70 61 | 72 61 74 69 6e 67 20 6c |aph-sepa|rating l|
|000020e0| 69 6e 65 3b 20 65 78 63 | 65 70 74 3a 20 69 66 20 |ine; exc|ept: if |
|000020f0| 74 68 65 20 66 69 72 73 | 74 20 72 65 61 6c 20 6c |the firs|t real l|
|00002100| 69 6e 65 20 6f 66 20 61 | 0a 70 61 72 61 67 72 61 |ine of a|.paragra|
|00002110| 70 68 20 69 73 20 70 72 | 65 63 65 64 65 64 20 62 |ph is pr|eceded b|
|00002120| 79 20 61 20 62 6c 61 6e | 6b 20 6c 69 6e 65 2c 20 |y a blan|k line, |
|00002130| 74 68 65 20 70 61 72 61 | 67 72 61 70 68 20 73 74 |the para|graph st|
|00002140| 61 72 74 73 20 61 74 20 | 74 68 61 74 0a 62 6c 61 |arts at |that.bla|
|00002150| 6e 6b 20 6c 69 6e 65 2e | 0a 0a 53 65 65 20 60 66 |nk line.|..See `f|
|00002160| 6f 72 77 61 72 64 2d 70 | 61 72 61 67 72 61 70 68 |orward-p|aragraph|
|00002170| 27 20 66 6f 72 20 6d 6f | 72 65 20 69 6e 66 6f 72 |' for mo|re infor|
|00002180| 6d 61 74 69 6f 6e 2e 1f | 0a 28 64 65 66 61 6c 69 |mation..|.(defali|
|00002190| 61 73 20 27 62 61 63 6b | 77 61 72 64 2d 70 61 72 |as 'back|ward-par|
|000021a0| 61 67 72 61 70 68 2d 6d | 61 72 6b 20 23 5b 28 26 |agraph-m|ark #[(&|
|000021b0| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|000021c0| 20 88 c1 5c 6e 21 87 22 | 20 5b 65 6e 73 75 72 65 | ..\n!."| [ensure|
|000021d0| 2d 6d 61 72 6b 20 62 61 | 63 6b 77 61 72 64 2d 70 |-mark ba|ckward-p|
|000021e0| 61 72 61 67 72 61 70 68 | 20 61 72 67 5d 20 32 20 |aragraph| arg] 2 |
|000021f0| 28 23 24 20 2e 20 38 31 | 33 35 29 20 22 70 22 5d |(#$ . 81|35) "p"]|
|00002200| 29 0a 23 40 36 32 34 20 | 45 6e 73 75 72 65 20 6d |).#@624 |Ensure m|
|00002210| 61 72 6b 20 69 73 20 61 | 63 74 69 76 65 3b 20 6d |ark is a|ctive; m|
|00002220| 6f 76 65 20 63 75 72 73 | 6f 72 20 76 65 72 74 69 |ove curs|or verti|
|00002230| 63 61 6c 6c 79 20 75 70 | 20 41 52 47 20 6c 69 6e |cally up| ARG lin|
|00002240| 65 73 2e 0a 49 66 20 74 | 68 65 72 65 20 69 73 20 |es..If t|here is |
|00002250| 6e 6f 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |no chara|cter in |
|00002260| 74 68 65 20 74 61 72 67 | 65 74 20 6c 69 6e 65 20 |the targ|et line |
|00002270| 65 78 61 63 74 6c 79 20 | 6f 76 65 72 20 74 68 65 |exactly |over the|
|00002280| 20 63 75 72 72 65 6e 74 | 20 63 6f 6c 75 6d 6e 2c | current| column,|
|00002290| 0a 74 68 65 20 63 75 72 | 73 6f 72 20 69 73 20 70 |.the cur|sor is p|
|000022a0| 6f 73 69 74 69 6f 6e 65 | 64 20 61 66 74 65 72 20 |ositione|d after |
|000022b0| 74 68 65 20 63 68 61 72 | 61 63 74 65 72 20 69 6e |the char|acter in|
|000022c0| 20 74 68 61 74 20 6c 69 | 6e 65 20 77 68 69 63 68 | that li|ne which|
|000022d0| 20 73 70 61 6e 73 20 74 | 68 69 73 0a 63 6f 6c 75 | spans t|his.colu|
|000022e0| 6d 6e 2c 20 6f 72 20 61 | 74 20 74 68 65 20 65 6e |mn, or a|t the en|
|000022f0| 64 20 6f 66 20 74 68 65 | 20 6c 69 6e 65 20 69 66 |d of the| line if|
|00002300| 20 69 74 20 69 73 20 6e | 6f 74 20 6c 6f 6e 67 20 | it is n|ot long |
|00002310| 65 6e 6f 75 67 68 2e 0a | 0a 54 68 65 20 63 6f 6d |enough..|.The com|
|00002320| 6d 61 6e 64 20 43 2d 78 | 20 43 2d 6e 20 63 61 6e |mand C-x| C-n can|
|00002330| 20 62 65 20 75 73 65 64 | 20 74 6f 20 63 72 65 61 | be used| to crea|
|00002340| 74 65 0a 61 20 73 65 6d | 69 70 65 72 6d 61 6e 65 |te.a sem|ipermane|
|00002350| 6e 74 20 67 6f 61 6c 20 | 63 6f 6c 75 6d 6e 20 74 |nt goal |column t|
|00002360| 6f 20 77 68 69 63 68 20 | 74 68 69 73 20 63 6f 6d |o which |this com|
|00002370| 6d 61 6e 64 20 61 6c 77 | 61 79 73 20 6d 6f 76 65 |mand alw|ays move|
|00002380| 73 2e 0a 54 68 65 6e 20 | 69 74 20 64 6f 65 73 20 |s..Then |it does |
|00002390| 6e 6f 74 20 74 72 79 20 | 74 6f 20 6d 6f 76 65 20 |not try |to move |
|000023a0| 76 65 72 74 69 63 61 6c | 6c 79 2e 0a 0a 49 66 20 |vertical|ly...If |
|000023b0| 79 6f 75 20 61 72 65 20 | 74 68 69 6e 6b 69 6e 67 |you are |thinking|
|000023c0| 20 6f 66 20 75 73 69 6e | 67 20 74 68 69 73 20 69 | of usin|g this i|
|000023d0| 6e 20 61 20 4c 69 73 70 | 20 70 72 6f 67 72 61 6d |n a Lisp| program|
|000023e0| 2c 20 63 6f 6e 73 69 64 | 65 72 20 75 73 69 6e 67 |, consid|er using|
|000023f0| 0a 60 66 6f 72 77 61 72 | 64 2d 6c 69 6e 65 27 20 |.`forwar|d-line' |
|00002400| 77 69 74 68 20 61 20 6e | 65 67 61 74 69 76 65 20 |with a n|egative |
|00002410| 61 72 67 75 6d 65 6e 74 | 20 69 6e 73 74 65 61 64 |argument| instead|
|00002420| 2e 20 20 49 74 20 69 73 | 20 75 73 75 61 6c 6c 79 |.  It is| usually|
|00002430| 20 65 61 73 69 65 72 0a | 74 6f 20 75 73 65 20 61 | easier.|to use a|
|00002440| 6e 64 20 6d 6f 72 65 20 | 72 65 6c 69 61 62 6c 65 |nd more |reliable|
|00002450| 20 28 6e 6f 20 64 65 70 | 65 6e 64 65 6e 63 65 20 | (no dep|endence |
|00002460| 6f 6e 20 67 6f 61 6c 20 | 63 6f 6c 75 6d 6e 2c 20 |on goal |column, |
|00002470| 65 74 63 2e 29 2e 1f 0a | 28 64 65 66 61 6c 69 61 |etc.)...|(defalia|
|00002480| 73 20 27 70 72 65 76 69 | 6f 75 73 2d 6c 69 6e 65 |s 'previ|ous-line|
|00002490| 2d 6d 61 72 6b 20 23 5b | 28 26 6f 70 74 69 6f 6e |-mark #[|(&option|
|000024a0| 61 6c 20 61 72 67 29 20 | 22 c0 20 88 c1 5c 6e 21 |al arg) |". ..\n!|
|000024b0| 88 c1 89 13 87 22 20 5b | 65 6e 73 75 72 65 2d 6d |....." [|ensure-m|
|000024c0| 61 72 6b 20 70 72 65 76 | 69 6f 75 73 2d 6c 69 6e |ark prev|ious-lin|
|000024d0| 65 20 61 72 67 20 74 68 | 69 73 2d 63 6f 6d 6d 61 |e arg th|is-comma|
|000024e0| 6e 64 5d 20 32 20 28 23 | 24 20 2e 20 38 37 31 32 |nd] 2 (#|$ . 8712|
|000024f0| 29 20 22 70 22 5d 29 0a | 23 40 31 38 38 20 45 6e |) "p"]).|#@188 En|
|00002500| 73 75 72 65 20 6d 61 72 | 6b 20 69 73 20 61 63 74 |sure mar|k is act|
|00002510| 69 76 65 3b 20 6d 6f 76 | 65 20 70 6f 69 6e 74 20 |ive; mov|e point |
|00002520| 74 6f 20 62 65 67 69 6e | 6e 69 6e 67 20 6f 66 20 |to begin|ning of |
|00002530| 63 75 72 72 65 6e 74 20 | 6c 69 6e 65 2e 0a 57 69 |current |line..Wi|
|00002540| 74 68 20 61 72 67 75 6d | 65 6e 74 20 41 52 47 20 |th argum|ent ARG |
|00002550| 6e 6f 74 20 6e 69 6c 20 | 6f 72 20 31 2c 20 6d 6f |not nil |or 1, mo|
|00002560| 76 65 20 66 6f 72 77 61 | 72 64 20 41 52 47 20 2d |ve forwa|rd ARG -|
|00002570| 20 31 20 6c 69 6e 65 73 | 20 66 69 72 73 74 2e 0a | 1 lines| first..|
|00002580| 49 66 20 73 63 61 6e 20 | 72 65 61 63 68 65 73 20 |If scan |reaches |
|00002590| 65 6e 64 20 6f 66 20 62 | 75 66 66 65 72 2c 20 73 |end of b|uffer, s|
|000025a0| 74 6f 70 20 74 68 65 72 | 65 20 77 69 74 68 6f 75 |top ther|e withou|
|000025b0| 74 20 65 72 72 6f 72 2e | 1f 0a 28 64 65 66 61 6c |t error.|..(defal|
|000025c0| 69 61 73 20 27 62 65 67 | 69 6e 6e 69 6e 67 2d 6f |ias 'beg|inning-o|
|000025d0| 66 2d 6c 69 6e 65 2d 6d | 61 72 6b 20 23 5b 28 26 |f-line-m|ark #[(&|
|000025e0| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|000025f0| 20 88 c1 5c 6e 21 87 22 | 20 5b 65 6e 73 75 72 65 | ..\n!."| [ensure|
|00002600| 2d 6d 61 72 6b 20 62 65 | 67 69 6e 6e 69 6e 67 2d |-mark be|ginning-|
|00002610| 6f 66 2d 6c 69 6e 65 20 | 61 72 67 5d 20 32 20 28 |of-line |arg] 2 (|
|00002620| 23 24 20 2e 20 39 34 37 | 30 29 20 22 70 22 5d 29 |#$ . 947|0) "p"])|
|00002630| 0a 23 40 32 35 36 20 45 | 6e 73 75 72 65 20 6d 61 |.#@256 E|nsure ma|
|00002640| 72 6b 20 69 73 20 61 63 | 74 69 76 65 3b 20 73 63 |rk is ac|tive; sc|
|00002650| 72 6f 6c 6c 20 75 70 77 | 61 72 64 20 41 52 47 20 |roll upw|ard ARG |
|00002660| 6c 69 6e 65 73 3b 20 6f | 72 20 6e 65 61 72 20 66 |lines; o|r near f|
|00002670| 75 6c 6c 20 73 63 72 65 | 65 6e 20 69 66 20 6e 6f |ull scre|en if no|
|00002680| 20 41 52 47 2e 0a 41 20 | 6e 65 61 72 20 66 75 6c | ARG..A |near ful|
|00002690| 6c 20 73 63 72 65 65 6e | 20 69 73 20 60 6e 65 78 |l screen| is `nex|
|000026a0| 74 2d 73 63 72 65 65 6e | 2d 63 6f 6e 74 65 78 74 |t-screen|-context|
|000026b0| 2d 6c 69 6e 65 73 27 20 | 6c 65 73 73 20 74 68 61 |-lines' |less tha|
|000026c0| 6e 20 61 20 66 75 6c 6c | 20 73 63 72 65 65 6e 2e |n a full| screen.|
|000026d0| 0a 4e 65 67 61 74 69 76 | 65 20 41 52 47 20 6d 65 |.Negativ|e ARG me|
|000026e0| 61 6e 73 20 73 63 72 6f | 6c 6c 20 64 6f 77 6e 77 |ans scro|ll downw|
|000026f0| 61 72 64 2e 0a 57 68 65 | 6e 20 63 61 6c 6c 69 6e |ard..Whe|n callin|
|00002700| 67 20 66 72 6f 6d 20 61 | 20 70 72 6f 67 72 61 6d |g from a| program|
|00002710| 2c 20 73 75 70 70 6c 79 | 20 61 20 6e 75 6d 62 65 |, supply| a numbe|
|00002720| 72 20 61 73 20 61 72 67 | 75 6d 65 6e 74 20 6f 72 |r as arg|ument or|
|00002730| 20 6e 69 6c 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 | nil...(|defalias|
|00002740| 20 27 73 63 72 6f 6c 6c | 2d 75 70 2d 6d 61 72 6b | 'scroll|-up-mark|
|00002750| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 61 72 | #[(&opt|ional ar|
|00002760| 67 29 20 22 c0 20 88 c1 | 5c 6e 21 87 22 20 5b 65 |g) ". ..|\n!." [e|
|00002770| 6e 73 75 72 65 2d 6d 61 | 72 6b 20 73 63 72 6f 6c |nsure-ma|rk scrol|
|00002780| 6c 2d 75 70 20 61 72 67 | 5d 20 32 20 28 23 24 20 |l-up arg|] 2 (#$ |
|00002790| 2e 20 39 37 38 33 29 20 | 22 50 22 5d 29 0a 23 40 |. 9783) |"P"]).#@|
|000027a0| 33 34 30 20 45 6e 73 75 | 72 65 20 6d 61 72 6b 20 |340 Ensu|re mark |
|000027b0| 69 73 20 61 63 74 69 76 | 65 3b 20 6d 6f 76 65 20 |is activ|e; move |
|000027c0| 70 6f 69 6e 74 20 74 6f | 20 74 68 65 20 62 65 67 |point to| the beg|
|000027d0| 69 6e 6e 69 6e 67 20 6f | 66 20 74 68 65 20 62 75 |inning o|f the bu|
|000027e0| 66 66 65 72 2e 0a 57 69 | 74 68 20 61 72 67 20 4e |ffer..Wi|th arg N|
|000027f0| 2c 20 70 75 74 20 70 6f | 69 6e 74 20 4e 2f 31 30 |, put po|int N/10|
|00002800| 20 6f 66 20 74 68 65 20 | 77 61 79 20 66 72 6f 6d | of the |way from|
|00002810| 20 74 68 65 20 62 65 67 | 69 6e 6e 69 6e 67 2e 0a | the beg|inning..|
|00002820| 0a 49 66 20 74 68 65 20 | 62 75 66 66 65 72 20 69 |.If the |buffer i|
|00002830| 73 20 6e 61 72 72 6f 77 | 65 64 2c 20 74 68 69 73 |s narrow|ed, this|
|00002840| 20 63 6f 6d 6d 61 6e 64 | 20 75 73 65 73 20 74 68 | command| uses th|
|00002850| 65 20 62 65 67 69 6e 6e | 69 6e 67 20 61 6e 64 20 |e beginn|ing and |
|00002860| 73 69 7a 65 0a 6f 66 20 | 74 68 65 20 61 63 63 65 |size.of |the acce|
|00002870| 73 73 69 62 6c 65 20 70 | 61 72 74 20 6f 66 20 74 |ssible p|art of t|
|00002880| 68 65 20 62 75 66 66 65 | 72 2e 0a 0a 44 6f 6e 27 |he buffe|r...Don'|
|00002890| 74 20 75 73 65 20 74 68 | 69 73 20 63 6f 6d 6d 61 |t use th|is comma|
|000028a0| 6e 64 20 69 6e 20 4c 69 | 73 70 20 70 72 6f 67 72 |nd in Li|sp progr|
|000028b0| 61 6d 73 21 0a 28 67 6f | 74 6f 2d 63 68 61 72 20 |ams!.(go|to-char |
|000028c0| 28 70 6f 69 6e 74 2d 6d | 69 6e 29 29 20 69 73 20 |(point-m|in)) is |
|000028d0| 66 61 73 74 65 72 20 61 | 6e 64 20 61 76 6f 69 64 |faster a|nd avoid|
|000028e0| 73 20 63 6c 6f 62 62 65 | 72 69 6e 67 20 74 68 65 |s clobbe|ring the|
|000028f0| 20 6d 61 72 6b 2e 1f 0a | 28 64 65 66 61 6c 69 61 | mark...|(defalia|
|00002900| 73 20 27 62 65 67 69 6e | 6e 69 6e 67 2d 6f 66 2d |s 'begin|ning-of-|
|00002910| 62 75 66 66 65 72 2d 6d | 61 72 6b 20 23 5b 28 26 |buffer-m|ark #[(&|
|00002920| 6f 70 74 69 6f 6e 61 6c | 20 61 72 67 29 20 22 c0 |optional| arg) ".|
|00002930| 20 88 64 65 5a 19 5c 6e | 83 29 00 65 09 c3 56 83 | .deZ.\n|.).e..V.|
|00002940| 1c 00 c4 5c 6e 21 09 c5 | a5 5f 82 25 00 09 c4 5c |...\n!..|._.%...\|
|00002950| 6e 21 5f c5 5c 5c c5 a5 | 5c 5c 82 2a 00 65 62 88 |n!_.\\..|\\.*.eb.|
|00002960| 29 5c 6e 85 33 00 c6 79 | 87 22 20 5b 65 6e 73 75 |)\n.3..y|." [ensu|
|00002970| 72 65 2d 6d 61 72 6b 20 | 73 69 7a 65 20 61 72 67 |re-mark |size arg|
|00002980| 20 31 30 30 30 30 20 70 | 72 65 66 69 78 2d 6e 75 | 10000 p|refix-nu|
|00002990| 6d 65 72 69 63 2d 76 61 | 6c 75 65 20 31 30 20 31 |meric-va|lue 10 1|
|000029a0| 5d 20 34 20 28 23 24 20 | 2e 20 31 30 31 34 38 29 |] 4 (#$ |. 10148)|
|000029b0| 20 22 50 22 5d 29 0a 23 | 40 31 34 34 20 44 65 61 | "P"]).#|@144 Dea|
|000029c0| 63 74 69 76 61 74 65 20 | 6d 61 72 6b 3b 20 6d 6f |ctivate |mark; mo|
|000029d0| 76 65 20 70 6f 69 6e 74 | 20 6c 65 66 74 20 41 52 |ve point| left AR|
|000029e0| 47 20 63 68 61 72 61 63 | 74 65 72 73 20 28 72 69 |G charac|ters (ri|
|000029f0| 67 68 74 20 69 66 20 41 | 52 47 20 6e 65 67 61 74 |ght if A|RG negat|
|00002a00| 69 76 65 29 2e 0a 4f 6e | 20 61 74 74 65 6d 70 74 |ive)..On| attempt|
|00002a10| 20 74 6f 20 70 61 73 73 | 20 62 65 67 69 6e 6e 69 | to pass| beginni|
|00002a20| 6e 67 20 6f 72 20 65 6e | 64 20 6f 66 20 62 75 66 |ng or en|d of buf|
|00002a30| 66 65 72 2c 20 73 74 6f | 70 20 61 6e 64 20 73 69 |fer, sto|p and si|
|00002a40| 67 6e 61 6c 20 65 72 72 | 6f 72 2e 1f 0a 28 64 65 |gnal err|or...(de|
|00002a50| 66 61 6c 69 61 73 20 27 | 62 61 63 6b 77 61 72 64 |falias '|backward|
|00002a60| 2d 63 68 61 72 2d 6e 6f | 6d 61 72 6b 20 23 5b 28 |-char-no|mark #[(|
|00002a70| 26 6f 70 74 69 6f 6e 61 | 6c 20 61 72 67 29 20 22 |&optiona|l arg) "|
|00002a80| c0 11 c2 0b 21 87 22 20 | 5b 6e 69 6c 20 6d 61 72 |....!." |[nil mar|
|00002a90| 6b 2d 61 63 74 69 76 65 | 20 62 61 63 6b 77 61 72 |k-active| backwar|
|00002aa0| 64 2d 63 68 61 72 20 61 | 72 67 5d 20 32 20 28 23 |d-char a|rg] 2 (#|
|00002ab0| 24 20 2e 20 31 30 36 38 | 35 29 20 22 70 22 5d 29 |$ . 1068|5) "p"])|
|00002ac0| 0a 23 40 31 31 30 20 44 | 65 61 63 74 69 76 61 74 |.#@110 D|eactivat|
|00002ad0| 65 20 6d 61 72 6b 3b 20 | 6d 6f 76 65 20 62 61 63 |e mark; |move bac|
|00002ae0| 6b 77 61 72 64 20 75 6e | 74 69 6c 20 65 6e 63 6f |kward un|til enco|
|00002af0| 75 6e 74 65 72 69 6e 67 | 20 74 68 65 20 65 6e 64 |untering| the end|
|00002b00| 20 6f 66 20 61 20 77 6f | 72 64 2e 0a 57 69 74 68 | of a wo|rd..With|
|00002b10| 20 61 72 67 75 6d 65 6e | 74 2c 20 64 6f 20 74 68 | argumen|t, do th|
|00002b20| 69 73 20 74 68 61 74 20 | 6d 61 6e 79 20 74 69 6d |is that |many tim|
|00002b30| 65 73 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |es...(de|falias '|
|00002b40| 62 61 63 6b 77 61 72 64 | 2d 77 6f 72 64 2d 6e 6f |backward|-word-no|
|00002b50| 6d 61 72 6b 20 23 5b 28 | 26 6f 70 74 69 6f 6e 61 |mark #[(|&optiona|
|00002b60| 6c 20 61 72 67 29 20 22 | c0 11 c2 0b 21 87 22 20 |l arg) "|....!." |
|00002b70| 5b 6e 69 6c 20 6d 61 72 | 6b 2d 61 63 74 69 76 65 |[nil mar|k-active|
|00002b80| 20 62 61 63 6b 77 61 72 | 64 2d 77 6f 72 64 20 61 | backwar|d-word a|
|00002b90| 72 67 5d 20 32 20 28 23 | 24 20 2e 20 31 30 39 35 |rg] 2 (#|$ . 1095|
|00002ba0| 31 29 20 22 70 22 5d 29 | 0a 23 40 34 34 34 20 44 |1) "p"])|.#@444 D|
|00002bb0| 65 61 63 74 69 76 61 74 | 65 20 6d 61 72 6b 3b 20 |eactivat|e mark; |
|00002bc0| 6d 6f 76 65 20 62 61 63 | 6b 77 61 72 64 20 74 6f |move bac|kward to|
|00002bd0| 20 73 74 61 72 74 20 6f | 66 20 70 61 72 61 67 72 | start o|f paragr|
|00002be0| 61 70 68 2e 0a 57 69 74 | 68 20 61 72 67 20 4e 2c |aph..Wit|h arg N,|
|00002bf0| 20 64 6f 20 69 74 20 4e | 20 74 69 6d 65 73 3b 20 | do it N| times; |
|00002c00| 6e 65 67 61 74 69 76 65 | 20 61 72 67 20 2d 4e 20 |negative| arg -N |
|00002c10| 6d 65 61 6e 73 20 6d 6f | 76 65 20 66 6f 72 77 61 |means mo|ve forwa|
|00002c20| 72 64 20 4e 20 70 61 72 | 61 67 72 61 70 68 73 2e |rd N par|agraphs.|
|00002c30| 0a 0a 41 20 70 61 72 61 | 67 72 61 70 68 20 73 74 |..A para|graph st|
|00002c40| 61 72 74 20 69 73 20 74 | 68 65 20 62 65 67 69 6e |art is t|he begin|
|00002c50| 6e 69 6e 67 20 6f 66 20 | 61 20 6c 69 6e 65 20 77 |ning of |a line w|
|00002c60| 68 69 63 68 20 69 73 20 | 61 0a 60 66 69 72 73 74 |hich is |a.`first|
|00002c70| 2d 6c 69 6e 65 2d 6f 66 | 2d 70 61 72 61 67 72 61 |-line-of|-paragra|
|00002c80| 70 68 27 20 6f 72 20 77 | 68 69 63 68 20 69 73 20 |ph' or w|hich is |
|00002c90| 6f 72 64 69 6e 61 72 79 | 20 74 65 78 74 20 61 6e |ordinary| text an|
|00002ca0| 64 20 66 6f 6c 6c 6f 77 | 73 20 61 0a 70 61 72 61 |d follow|s a.para|
|00002cb0| 67 72 61 70 68 2d 73 65 | 70 61 72 61 74 69 6e 67 |graph-se|parating|
|00002cc0| 20 6c 69 6e 65 3b 20 65 | 78 63 65 70 74 3a 20 69 | line; e|xcept: i|
|00002cd0| 66 20 74 68 65 20 66 69 | 72 73 74 20 72 65 61 6c |f the fi|rst real|
|00002ce0| 20 6c 69 6e 65 20 6f 66 | 20 61 0a 70 61 72 61 67 | line of| a.parag|
|00002cf0| 72 61 70 68 20 69 73 20 | 70 72 65 63 65 64 65 64 |raph is |preceded|
|00002d00| 20 62 79 20 61 20 62 6c | 61 6e 6b 20 6c 69 6e 65 | by a bl|ank line|
|00002d10| 2c 20 74 68 65 20 70 61 | 72 61 67 72 61 70 68 20 |, the pa|ragraph |
|00002d20| 73 74 61 72 74 73 20 61 | 74 20 74 68 61 74 0a 62 |starts a|t that.b|
|00002d30| 6c 61 6e 6b 20 6c 69 6e | 65 2e 0a 0a 53 65 65 20 |lank lin|e...See |
|00002d40| 60 66 6f 72 77 61 72 64 | 2d 70 61 72 61 67 72 61 |`forward|-paragra|
|00002d50| 70 68 27 20 66 6f 72 20 | 6d 6f 72 65 20 69 6e 66 |ph' for |more inf|
|00002d60| 6f 72 6d 61 74 69 6f 6e | 2e 1f 0a 28 64 65 66 61 |ormation|...(defa|
|00002d70| 6c 69 61 73 20 27 62 61 | 63 6b 77 61 72 64 2d 70 |lias 'ba|ckward-p|
|00002d80| 61 72 61 67 72 61 70 68 | 2d 6e 6f 6d 61 72 6b 20 |aragraph|-nomark |
|00002d90| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 61 72 67 |#[(&opti|onal arg|
|00002da0| 29 20 22 c0 11 c2 0b 21 | 87 22 20 5b 6e 69 6c 20 |) "....!|." [nil |
|00002db0| 6d 61 72 6b 2d 61 63 74 | 69 76 65 20 62 61 63 6b |mark-act|ive back|
|00002dc0| 77 61 72 64 2d 70 61 72 | 61 67 72 61 70 68 20 61 |ward-par|agraph a|
|00002dd0| 72 67 5d 20 32 20 28 23 | 24 20 2e 20 31 31 31 38 |rg] 2 (#|$ . 1118|
|00002de0| 33 29 20 22 70 22 5d 29 | 0a 23 40 34 31 35 20 44 |3) "p"])|.#@415 D|
|00002df0| 65 61 63 74 69 76 61 74 | 65 20 6d 61 72 6b 3b 20 |eactivat|e mark; |
|00002e00| 6d 6f 76 65 20 63 75 72 | 73 6f 72 20 76 65 72 74 |move cur|sor vert|
|00002e10| 69 63 61 6c 6c 79 20 75 | 70 20 41 52 47 20 6c 69 |ically u|p ARG li|
|00002e20| 6e 65 73 2e 0a 49 66 20 | 74 68 65 72 65 20 69 73 |nes..If |there is|
|00002e30| 20 6e 6f 20 63 68 61 72 | 61 63 74 65 72 20 69 6e | no char|acter in|
|00002e40| 20 74 68 65 20 74 61 72 | 67 65 74 20 6c 69 6e 65 | the tar|get line|
|00002e50| 20 65 78 61 63 74 6c 79 | 20 6f 76 65 72 20 74 68 | exactly| over th|
|00002e60| 65 20 63 75 72 72 65 6e | 74 20 63 6f 6c 75 6d 6e |e curren|t column|
|00002e70| 2c 0a 74 68 65 20 63 75 | 72 73 6f 72 20 69 73 20 |,.the cu|rsor is |
|00002e80| 70 6f 73 69 74 69 6f 6e | 65 64 20 61 66 74 65 72 |position|ed after|
|00002e90| 20 74 68 65 20 63 68 61 | 72 61 63 74 65 72 20 69 | the cha|racter i|
|00002ea0| 6e 20 74 68 61 74 20 6c | 69 6e 65 20 77 68 69 63 |n that l|ine whic|
|00002eb0| 68 20 73 70 61 6e 73 20 | 74 68 69 73 0a 63 6f 6c |h spans |this.col|
|00002ec0| 75 6d 6e 2c 20 6f 72 20 | 61 74 20 74 68 65 20 65 |umn, or |at the e|
|00002ed0| 6e 64 20 6f 66 20 74 68 | 65 20 6c 69 6e 65 20 69 |nd of th|e line i|
|00002ee0| 66 20 69 74 20 69 73 20 | 6e 6f 74 20 6c 6f 6e 67 |f it is |not long|
|00002ef0| 20 65 6e 6f 75 67 68 2e | 0a 0a 54 68 65 20 63 6f | enough.|..The co|
|00002f00| 6d 6d 61 6e 64 20 43 2d | 78 20 43 2d 6e 20 63 61 |mmand C-|x C-n ca|
|00002f10| 6e 20 62 65 20 75 73 65 | 64 20 74 6f 20 63 72 65 |n be use|d to cre|
|00002f20| 61 74 65 0a 61 20 73 65 | 6d 69 70 65 72 6d 61 6e |ate.a se|miperman|
|00002f30| 65 6e 74 20 67 6f 61 6c | 20 63 6f 6c 75 6d 6e 20 |ent goal| column |
|00002f40| 74 6f 20 77 68 69 63 68 | 20 74 68 69 73 20 63 6f |to which| this co|
|00002f50| 6d 6d 61 6e 64 20 61 6c | 77 61 79 73 20 6d 6f 76 |mmand al|ways mov|
|00002f60| 65 73 2e 0a 54 68 65 6e | 20 69 74 20 64 6f 65 73 |es..Then| it does|
|00002f70| 20 6e 6f 74 20 74 72 79 | 20 74 6f 20 6d 6f 76 65 | not try| to move|
|00002f80| 20 76 65 72 74 69 63 61 | 6c 6c 79 2e 1f 0a 28 64 | vertica|lly...(d|
|00002f90| 65 66 61 6c 69 61 73 20 | 27 70 72 65 76 69 6f 75 |efalias |'previou|
|00002fa0| 73 2d 6c 69 6e 65 2d 6e | 6f 6d 61 72 6b 20 23 5b |s-line-n|omark #[|
|00002fb0| 28 26 6f 70 74 69 6f 6e | 61 6c 20 61 72 67 29 20 |(&option|al arg) |
|00002fc0| 22 c0 11 c2 0b 21 88 c2 | 89 14 87 22 20 5b 6e 69 |"....!..|..." [ni|
|00002fd0| 6c 20 6d 61 72 6b 2d 61 | 63 74 69 76 65 20 70 72 |l mark-a|ctive pr|
|00002fe0| 65 76 69 6f 75 73 2d 6c | 69 6e 65 20 61 72 67 20 |evious-l|ine arg |
|00002ff0| 74 68 69 73 2d 63 6f 6d | 6d 61 6e 64 5d 20 32 20 |this-com|mand] 2 |
|00003000| 28 23 24 20 2e 20 31 31 | 37 35 39 29 20 22 70 22 |(#$ . 11|759) "p"|
|00003010| 5d 29 0a 23 40 31 38 32 | 20 44 65 61 63 74 69 76 |]).#@182| Deactiv|
|00003020| 61 74 65 20 6d 61 72 6b | 3b 20 6d 6f 76 65 20 70 |ate mark|; move p|
|00003030| 6f 69 6e 74 20 74 6f 20 | 62 65 67 69 6e 6e 69 6e |oint to |beginnin|
|00003040| 67 20 6f 66 20 63 75 72 | 72 65 6e 74 20 6c 69 6e |g of cur|rent lin|
|00003050| 65 2e 0a 57 69 74 68 20 | 61 72 67 75 6d 65 6e 74 |e..With |argument|
|00003060| 20 41 52 47 20 6e 6f 74 | 20 6e 69 6c 20 6f 72 20 | ARG not| nil or |
|00003070| 31 2c 20 6d 6f 76 65 20 | 66 6f 72 77 61 72 64 20 |1, move |forward |
|00003080| 41 52 47 20 2d 20 31 20 | 6c 69 6e 65 73 20 66 69 |ARG - 1 |lines fi|
|00003090| 72 73 74 2e 0a 49 66 20 | 73 63 61 6e 20 72 65 61 |rst..If |scan rea|
|000030a0| 63 68 65 73 20 65 6e 64 | 20 6f 66 20 62 75 66 66 |ches end| of buff|
|000030b0| 65 72 2c 20 73 74 6f 70 | 20 74 68 65 72 65 20 77 |er, stop| there w|
|000030c0| 69 74 68 6f 75 74 20 65 | 72 72 6f 72 2e 1f 0a 28 |ithout e|rror...(|
|000030d0| 64 65 66 61 6c 69 61 73 | 20 27 62 65 67 69 6e 6e |defalias| 'beginn|
|000030e0| 69 6e 67 2d 6f 66 2d 6c | 69 6e 65 2d 6e 6f 6d 61 |ing-of-l|ine-noma|
|000030f0| 72 6b 20 23 5b 28 26 6f | 70 74 69 6f 6e 61 6c 20 |rk #[(&o|ptional |
|00003100| 61 72 67 29 20 22 c0 11 | c2 0b 21 87 22 20 5b 6e |arg) "..|..!." [n|
|00003110| 69 6c 20 6d 61 72 6b 2d | 61 63 74 69 76 65 20 62 |il mark-|active b|
|00003120| 65 67 69 6e 6e 69 6e 67 | 2d 6f 66 2d 6c 69 6e 65 |eginning|-of-line|
|00003130| 20 61 72 67 5d 20 32 20 | 28 23 24 20 2e 20 31 32 | arg] 2 |(#$ . 12|
|00003140| 33 31 33 29 20 22 70 22 | 5d 29 0a 23 40 32 35 30 |313) "p"|]).#@250|
|00003150| 20 44 65 61 63 74 69 76 | 61 74 65 20 6d 61 72 6b | Deactiv|ate mark|
|00003160| 3b 20 73 63 72 6f 6c 6c | 20 75 70 77 61 72 64 20 |; scroll| upward |
|00003170| 41 52 47 20 6c 69 6e 65 | 73 3b 20 6f 72 20 6e 65 |ARG line|s; or ne|
|00003180| 61 72 20 66 75 6c 6c 20 | 73 63 72 65 65 6e 20 69 |ar full |screen i|
|00003190| 66 20 6e 6f 20 41 52 47 | 2e 0a 41 20 6e 65 61 72 |f no ARG|..A near|
|000031a0| 20 66 75 6c 6c 20 73 63 | 72 65 65 6e 20 69 73 20 | full sc|reen is |
|000031b0| 60 6e 65 78 74 2d 73 63 | 72 65 65 6e 2d 63 6f 6e |`next-sc|reen-con|
|000031c0| 74 65 78 74 2d 6c 69 6e | 65 73 27 20 6c 65 73 73 |text-lin|es' less|
|000031d0| 20 74 68 61 6e 20 61 20 | 66 75 6c 6c 20 73 63 72 | than a |full scr|
|000031e0| 65 65 6e 2e 0a 4e 65 67 | 61 74 69 76 65 20 41 52 |een..Neg|ative AR|
|000031f0| 47 20 6d 65 61 6e 73 20 | 73 63 72 6f 6c 6c 20 64 |G means |scroll d|
|00003200| 6f 77 6e 77 61 72 64 2e | 0a 57 68 65 6e 20 63 61 |ownward.|.When ca|
|00003210| 6c 6c 69 6e 67 20 66 72 | 6f 6d 20 61 20 70 72 6f |lling fr|om a pro|
|00003220| 67 72 61 6d 2c 20 73 75 | 70 70 6c 79 20 61 20 6e |gram, su|pply a n|
|00003230| 75 6d 62 65 72 20 61 73 | 20 61 72 67 75 6d 65 6e |umber as| argumen|
|00003240| 74 20 6f 72 20 6e 69 6c | 2e 1f 0a 28 64 65 66 61 |t or nil|...(defa|
|00003250| 6c 69 61 73 20 27 73 63 | 72 6f 6c 6c 2d 75 70 2d |lias 'sc|roll-up-|
|00003260| 6e 6f 6d 61 72 6b 20 23 | 5b 28 26 6f 70 74 69 6f |nomark #|[(&optio|
|00003270| 6e 61 6c 20 61 72 67 29 | 20 22 c0 11 c2 0b 21 87 |nal arg)| "....!.|
|00003280| 22 20 5b 6e 69 6c 20 6d | 61 72 6b 2d 61 63 74 69 |" [nil m|ark-acti|
|00003290| 76 65 20 73 63 72 6f 6c | 6c 2d 75 70 20 61 72 67 |ve scrol|l-up arg|
|000032a0| 5d 20 32 20 28 23 24 20 | 2e 20 31 32 36 32 35 29 |] 2 (#$ |. 12625)|
|000032b0| 20 22 50 22 5d 29 0a 23 | 40 33 33 34 20 44 65 61 | "P"]).#|@334 Dea|
|000032c0| 63 74 69 76 61 74 65 20 | 6d 61 72 6b 3b 20 6d 6f |ctivate |mark; mo|
|000032d0| 76 65 20 70 6f 69 6e 74 | 20 74 6f 20 74 68 65 20 |ve point| to the |
|000032e0| 62 65 67 69 6e 6e 69 6e | 67 20 6f 66 20 74 68 65 |beginnin|g of the|
|000032f0| 20 62 75 66 66 65 72 2e | 0a 57 69 74 68 20 61 72 | buffer.|.With ar|
|00003300| 67 20 4e 2c 20 70 75 74 | 20 70 6f 69 6e 74 20 4e |g N, put| point N|
|00003310| 2f 31 30 20 6f 66 20 74 | 68 65 20 77 61 79 20 66 |/10 of t|he way f|
|00003320| 72 6f 6d 20 74 68 65 20 | 62 65 67 69 6e 6e 69 6e |rom the |beginnin|
|00003330| 67 2e 0a 0a 49 66 20 74 | 68 65 20 62 75 66 66 65 |g...If t|he buffe|
|00003340| 72 20 69 73 20 6e 61 72 | 72 6f 77 65 64 2c 20 74 |r is nar|rowed, t|
|00003350| 68 69 73 20 63 6f 6d 6d | 61 6e 64 20 75 73 65 73 |his comm|and uses|
|00003360| 20 74 68 65 20 62 65 67 | 69 6e 6e 69 6e 67 20 61 | the beg|inning a|
|00003370| 6e 64 20 73 69 7a 65 0a | 6f 66 20 74 68 65 20 61 |nd size.|of the a|
|00003380| 63 63 65 73 73 69 62 6c | 65 20 70 61 72 74 20 6f |ccessibl|e part o|
|00003390| 66 20 74 68 65 20 62 75 | 66 66 65 72 2e 0a 0a 44 |f the bu|ffer...D|
|000033a0| 6f 6e 27 74 20 75 73 65 | 20 74 68 69 73 20 63 6f |on't use| this co|
|000033b0| 6d 6d 61 6e 64 20 69 6e | 20 4c 69 73 70 20 70 72 |mmand in| Lisp pr|
|000033c0| 6f 67 72 61 6d 73 21 0a | 28 67 6f 74 6f 2d 63 68 |ograms!.|(goto-ch|
|000033d0| 61 72 20 28 70 6f 69 6e | 74 2d 6d 69 6e 29 29 20 |ar (poin|t-min)) |
|000033e0| 69 73 20 66 61 73 74 65 | 72 20 61 6e 64 20 61 76 |is faste|r and av|
|000033f0| 6f 69 64 73 20 63 6c 6f | 62 62 65 72 69 6e 67 20 |oids clo|bbering |
|00003400| 74 68 65 20 6d 61 72 6b | 2e 1f 0a 28 64 65 66 61 |the mark|...(defa|
|00003410| 6c 69 61 73 20 27 62 65 | 67 69 6e 6e 69 6e 67 2d |lias 'be|ginning-|
|00003420| 6f 66 2d 62 75 66 66 65 | 72 2d 6e 6f 6d 61 72 6b |of-buffe|r-nomark|
|00003430| 20 23 5b 28 26 6f 70 74 | 69 6f 6e 61 6c 20 61 72 | #[(&opt|ional ar|
|00003440| 67 29 20 22 c0 11 64 65 | 5a 1a 0b 83 28 00 65 5c |g) "..de|Z...(.e\|
|00003450| 6e c4 56 83 1b 00 c5 0b | 21 5c 6e c6 a5 5f 82 24 |n.V.....|!\n.._.$|
|00003460| 00 5c 6e c5 0b 21 5f c6 | 5c 5c c6 a5 5c 5c 82 29 |.\n..!_.|\\..\\.)|
|00003470| 00 65 62 88 29 0b 85 32 | 00 c7 79 87 22 20 5b 6e |.eb.)..2|..y." [n|
|00003480| 69 6c 20 6d 61 72 6b 2d | 61 63 74 69 76 65 20 73 |il mark-|active s|
|00003490| 69 7a 65 20 61 72 67 20 | 31 30 30 30 30 20 70 72 |ize arg |10000 pr|
|000034a0| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|000034b0| 75 65 20 31 30 20 31 5d | 20 34 20 28 23 24 20 2e |ue 10 1]| 4 (#$ .|
|000034c0| 20 31 32 39 38 39 29 20 | 22 50 22 5d 29 0a 23 40 | 12989) |"P"]).#@|
|000034d0| 34 32 39 20 43 68 61 6e | 67 65 20 6d 61 72 6b 20 |429 Chan|ge mark |
|000034e0| 62 65 68 61 76 69 6f 75 | 72 20 74 6f 20 65 6d 75 |behaviou|r to emu|
|000034f0| 6c 61 74 65 20 6d 6f 74 | 69 66 2c 20 4d 41 43 20 |late mot|if, MAC |
|00003500| 6f 72 20 4d 53 2d 57 69 | 6e 64 6f 77 73 20 63 75 |or MS-Wi|ndows cu|
|00003510| 74 20 61 6e 64 20 70 61 | 73 74 65 20 73 74 79 6c |t and pa|ste styl|
|00003520| 65 2e 0a 0a 54 68 69 73 | 20 6d 6f 64 65 20 77 69 |e...This| mode wi|
|00003530| 6c 6c 20 73 77 69 74 63 | 68 20 6f 6e 20 64 65 6c |ll switc|h on del|
|00003540| 65 74 65 2d 73 65 6c 65 | 63 74 69 6f 6e 2d 6d 6f |ete-sele|ction-mo|
|00003550| 64 65 20 61 6e 64 0a 74 | 72 61 6e 73 69 65 6e 74 |de and.t|ransient|
|00003560| 2d 6d 61 72 6b 2d 6d 6f | 64 65 2e 0a 0a 54 68 65 |-mark-mo|de...The|
|00003570| 20 63 75 72 73 6f 72 20 | 6b 65 79 73 20 28 61 6e | cursor |keys (an|
|00003580| 64 20 6f 74 68 65 72 73 | 29 20 61 72 65 20 62 6f |d others|) are bo|
|00003590| 75 6e 64 20 74 6f 20 6e | 65 77 20 66 75 6e 63 74 |und to n|ew funct|
|000035a0| 69 6f 6e 73 0a 77 68 69 | 63 68 20 77 69 6c 6c 20 |ions.whi|ch will |
|000035b0| 6d 6f 64 69 66 79 20 74 | 68 65 20 73 74 61 74 75 |modify t|he statu|
|000035c0| 73 20 6f 66 20 74 68 65 | 20 6d 61 72 6b 2e 20 49 |s of the| mark. I|
|000035d0| 74 20 77 69 6c 6c 20 62 | 65 0a 70 6f 73 73 69 62 |t will b|e.possib|
|000035e0| 6c 65 20 74 6f 20 73 65 | 6c 65 63 74 20 72 65 67 |le to se|lect reg|
|000035f0| 69 6f 6e 73 20 77 69 74 | 68 20 73 68 69 66 74 2d |ions wit|h shift-|
|00003600| 63 75 72 73 6f 72 6b 65 | 79 73 2e 20 41 6c 6c 20 |cursorke|ys. All |
|00003610| 74 68 69 73 0a 74 72 69 | 65 73 20 74 6f 20 65 6d |this.tri|es to em|
|00003620| 75 6c 61 74 65 20 74 68 | 65 20 6c 6f 6f 6b 2d 61 |ulate th|e look-a|
|00003630| 6e 64 2d 66 65 65 6c 20 | 6f 66 20 47 55 49 73 20 |nd-feel |of GUIs |
|00003640| 6c 69 6b 65 20 6d 6f 74 | 69 66 2c 0a 74 68 65 20 |like mot|if,.the |
|00003650| 4d 41 43 20 47 55 49 20 | 6f 72 20 4d 53 2d 57 69 |MAC GUI |or MS-Wi|
|00003660| 6e 64 6f 77 73 20 28 73 | 6f 72 72 79 20 66 6f 72 |ndows (s|orry for|
|00003670| 20 74 68 65 20 6c 61 73 | 74 20 6f 6e 65 29 2e 1f | the las|t one)..|
|00003680| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 70 63 2d 73 |.(defali|as 'pc-s|
|00003690| 65 6c 65 63 74 69 6f 6e | 2d 6d 6f 64 65 20 23 5b |election|-mode #[|
|000036a0| 6e 69 6c 20 22 c0 09 c2 | c3 23 88 c0 09 c4 c5 23 |nil "...|.#.....#|
|000036b0| 88 c0 09 c6 c7 23 88 c0 | 09 c8 c9 23 88 c0 09 ca |.....#..|...#....|
|000036c0| cb 23 88 c0 09 cc c9 23 | 88 c0 09 cd cb 23 88 c0 |.#.....#|.....#..|
|000036d0| 09 ce cf 23 88 c0 09 d0 | d1 23 88 c0 09 d2 d3 23 |...#....|.#.....#|
|000036e0| 88 c0 09 d4 d5 23 88 d6 | d7 d8 5c 22 88 d6 d9 da |.....#..|..\"....|
|000036f0| 5c 22 88 d6 db d8 5c 22 | 88 d6 dc da 5c 22 88 c0 |\"....\"|....\"..|
|00003700| 09 dd de 23 88 c0 09 df | e0 23 88 c0 09 e1 e2 23 |...#....|.#.....#|
|00003710| 88 c0 09 e3 e4 23 88 c0 | 09 e5 e6 23 88 c0 09 e7 |.....#..|...#....|
|00003720| e8 23 88 c0 09 e9 e6 23 | 88 c0 09 ea e8 23 88 c0 |.#.....#|.....#..|
|00003730| 09 eb ec 23 88 c0 09 ed | ee 23 88 c0 09 ef f0 23 |...#....|.#.....#|
|00003740| 88 c0 09 f1 f2 23 88 d6 | f3 f4 5c 22 88 d6 f5 f6 |.....#..|..\"....|
|00003750| 5c 22 88 d6 f7 f4 5c 22 | 88 d6 f8 f6 5c 22 88 c0 |\"....\"|....\"..|
|00003760| 09 f9 fa 23 88 c0 09 fb | fc 23 88 c0 09 fd fe 23 |...#....|.#.....#|
|00003770| 88 c0 09 ff 81 40 00 23 | 88 c0 09 81 41 00 81 42 |.....@.#|....A..B|
|00003780| 00 23 88 c0 09 81 43 00 | fe 23 88 c0 09 81 44 00 |.#....C.|.#....D.|
|00003790| 81 40 00 23 88 c0 09 81 | 45 00 81 42 00 23 88 d6 |.@.#....|E..B.#..|
|000037a0| 81 46 00 81 47 00 5c 22 | 88 d6 81 48 00 81 49 00 |.F..G.\"|...H..I.|
|000037b0| 5c 22 88 d6 81 4a 00 81 | 4b 00 5c 22 88 d6 81 4c |\"...J..|K.\"...L|
|000037c0| 00 81 4d 00 5c 22 88 d6 | 81 4e 00 81 4f 00 5c 22 |..M.\"..|.N..O.\"|
|000037d0| 88 d6 81 50 00 81 51 00 | 5c 22 88 d6 81 52 00 81 |...P..Q.|\"...R..|
|000037e0| 53 00 5c 22 88 d6 81 54 | 00 81 55 00 5c 22 88 d6 |S.\"...T|..U.\"..|
|000037f0| 81 56 00 81 57 00 5c 22 | 88 c0 0e 58 81 59 00 81 |.V..W.\"|...X.Y..|
|00003800| 5a 00 23 88 d6 81 5b 00 | 81 5c 5c 00 5c 22 88 d6 |Z.#...[.|.\\.\"..|
|00003810| 81 5d 00 81 5e 00 5c 22 | 88 d6 81 5f 00 81 60 00 |.]..^.\"|..._..`.|
|00003820| 5c 22 88 81 61 00 16 62 | 81 61 00 16 63 81 64 00 |\"..a..b|.a..c.d.|
|00003830| 81 65 00 21 87 22 20 5b | 64 65 66 69 6e 65 2d 6b |.e.!." [|define-k|
|00003840| 65 79 20 67 6c 6f 62 61 | 6c 2d 6d 61 70 20 22 f7 |ey globa|l-map ".|
|00003850| 22 20 63 6f 70 79 2d 72 | 65 67 69 6f 6e 2d 61 73 |" copy-r|egion-as|
|00003860| 2d 6b 69 6c 6c 2d 6e 6f | 6d 61 72 6b 20 5b 53 2d |-kill-no|mark [S-|
|00003870| 72 69 67 68 74 5d 20 66 | 6f 72 77 61 72 64 2d 63 |right] f|orward-c|
|00003880| 68 61 72 2d 6d 61 72 6b | 20 5b 72 69 67 68 74 5d |har-mark| [right]|
|00003890| 20 66 6f 72 77 61 72 64 | 2d 63 68 61 72 2d 6e 6f | forward|-char-no|
|000038a0| 6d 61 72 6b 20 5b 43 2d | 53 2d 72 69 67 68 74 5d |mark [C-|S-right]|
|000038b0| 20 66 6f 72 77 61 72 64 | 2d 77 6f 72 64 2d 6d 61 | forward|-word-ma|
|000038c0| 72 6b 20 5b 43 2d 72 69 | 67 68 74 5d 20 66 6f 72 |rk [C-ri|ght] for|
|000038d0| 77 61 72 64 2d 77 6f 72 | 64 2d 6e 6f 6d 61 72 6b |ward-wor|d-nomark|
|000038e0| 20 5b 4d 2d 53 2d 72 69 | 67 68 74 5d 20 5b 4d 2d | [M-S-ri|ght] [M-|
|000038f0| 72 69 67 68 74 5d 20 5b | 53 2d 64 6f 77 6e 5d 20 |right] [|S-down] |
|00003900| 6e 65 78 74 2d 6c 69 6e | 65 2d 6d 61 72 6b 20 5b |next-lin|e-mark [|
|00003910| 64 6f 77 6e 5d 20 6e 65 | 78 74 2d 6c 69 6e 65 2d |down] ne|xt-line-|
|00003920| 6e 6f 6d 61 72 6b 20 5b | 53 2d 65 6e 64 5d 20 65 |nomark [|S-end] e|
|00003930| 6e 64 2d 6f 66 2d 6c 69 | 6e 65 2d 6d 61 72 6b 20 |nd-of-li|ne-mark |
|00003940| 5b 65 6e 64 5d 20 65 6e | 64 2d 6f 66 2d 6c 69 6e |[end] en|d-of-lin|
|00003950| 65 2d 6e 6f 6d 61 72 6b | 20 67 6c 6f 62 61 6c 2d |e-nomark| global-|
|00003960| 73 65 74 2d 6b 65 79 20 | 5b 53 2d 43 2d 65 6e 64 |set-key |[S-C-end|
|00003970| 5d 20 65 6e 64 2d 6f 66 | 2d 62 75 66 66 65 72 2d |] end-of|-buffer-|
|00003980| 6d 61 72 6b 20 5b 43 2d | 65 6e 64 5d 20 65 6e 64 |mark [C-|end] end|
|00003990| 2d 6f 66 2d 62 75 66 66 | 65 72 2d 6e 6f 6d 61 72 |-of-buff|er-nomar|
|000039a0| 6b 20 5b 53 2d 4d 2d 65 | 6e 64 5d 20 5b 4d 2d 65 |k [S-M-e|nd] [M-e|
|000039b0| 6e 64 5d 20 5b 53 2d 6e | 65 78 74 5d 20 73 63 72 |nd] [S-n|ext] scr|
|000039c0| 6f 6c 6c 2d 75 70 2d 6d | 61 72 6b 20 5b 6e 65 78 |oll-up-m|ark [nex|
|000039d0| 74 5d 20 73 63 72 6f 6c | 6c 2d 75 70 2d 6e 6f 6d |t] scrol|l-up-nom|
|000039e0| 61 72 6b 20 5b 53 2d 6c | 65 66 74 5d 20 62 61 63 |ark [S-l|eft] bac|
|000039f0| 6b 77 61 72 64 2d 63 68 | 61 72 2d 6d 61 72 6b 20 |kward-ch|ar-mark |
|00003a00| 5b 6c 65 66 74 5d 20 62 | 61 63 6b 77 61 72 64 2d |[left] b|ackward-|
|00003a10| 63 68 61 72 2d 6e 6f 6d | 61 72 6b 20 5b 43 2d 53 |char-nom|ark [C-S|
|00003a20| 2d 6c 65 66 74 5d 20 62 | 61 63 6b 77 61 72 64 2d |-left] b|ackward-|
|00003a30| 77 6f 72 64 2d 6d 61 72 | 6b 20 5b 43 2d 6c 65 66 |word-mar|k [C-lef|
|00003a40| 74 5d 20 62 61 63 6b 77 | 61 72 64 2d 77 6f 72 64 |t] backw|ard-word|
|00003a50| 2d 6e 6f 6d 61 72 6b 20 | 5b 4d 2d 53 2d 6c 65 66 |-nomark |[M-S-lef|
|00003a60| 74 5d 20 5b 4d 2d 6c 65 | 66 74 5d 20 5b 53 2d 75 |t] [M-le|ft] [S-u|
|00003a70| 70 5d 20 70 72 65 76 69 | 6f 75 73 2d 6c 69 6e 65 |p] previ|ous-line|
|00003a80| 2d 6d 61 72 6b 20 5b 75 | 70 5d 20 70 72 65 76 69 |-mark [u|p] previ|
|00003a90| 6f 75 73 2d 6c 69 6e 65 | 2d 6e 6f 6d 61 72 6b 20 |ous-line|-nomark |
|00003aa0| 5b 53 2d 68 6f 6d 65 5d | 20 62 65 67 69 6e 6e 69 |[S-home]| beginni|
|00003ab0| 6e 67 2d 6f 66 2d 6c 69 | 6e 65 2d 6d 61 72 6b 20 |ng-of-li|ne-mark |
|00003ac0| 5b 68 6f 6d 65 5d 20 62 | 65 67 69 6e 6e 69 6e 67 |[home] b|eginning|
|00003ad0| 2d 6f 66 2d 6c 69 6e 65 | 2d 6e 6f 6d 61 72 6b 20 |-of-line|-nomark |
|00003ae0| 5b 53 2d 43 2d 68 6f 6d | 65 5d 20 62 65 67 69 6e |[S-C-hom|e] begin|
|00003af0| 6e 69 6e 67 2d 6f 66 2d | 62 75 66 66 65 72 2d 6d |ning-of-|buffer-m|
|00003b00| 61 72 6b 20 5b 43 2d 68 | 6f 6d 65 5d 20 62 65 67 |ark [C-h|ome] beg|
|00003b10| 69 6e 6e 69 6e 67 2d 6f | 66 2d 62 75 66 66 65 72 |inning-o|f-buffer|
|00003b20| 2d 6e 6f 6d 61 72 6b 20 | 5b 53 2d 4d 2d 68 6f 6d |-nomark |[S-M-hom|
|00003b30| 65 5d 20 5b 4d 2d 68 6f | 6d 65 5d 20 5b 53 2d 70 |e] [M-ho|me] [S-p|
|00003b40| 72 69 6f 72 5d 20 73 63 | 72 6f 6c 6c 2d 64 6f 77 |rior] sc|roll-dow|
|00003b50| 6e 2d 6d 61 72 6b 20 5b | 70 72 69 6f 72 5d 20 73 |n-mark [|prior] s|
|00003b60| 63 72 6f 6c 6c 2d 64 6f | 77 6e 2d 6e 6f 6d 61 72 |croll-do|wn-nomar|
|00003b70| 6b 20 5b 53 2d 69 6e 73 | 65 72 74 5d 20 79 61 6e |k [S-ins|ert] yan|
|00003b80| 6b 20 5b 43 2d 69 6e 73 | 65 72 74 5d 20 63 6f 70 |k [C-ins|ert] cop|
|00003b90| 79 2d 72 65 67 69 6f 6e | 2d 61 73 2d 6b 69 6c 6c |y-region|-as-kill|
|00003ba0| 20 5b 53 2d 64 65 6c 65 | 74 65 5d 20 6b 69 6c 6c | [S-dele|te] kill|
|00003bb0| 2d 72 65 67 69 6f 6e 20 | 5b 66 31 36 5d 20 5b 66 |-region |[f16] [f|
|00003bc0| 31 38 5d 20 5b 66 32 30 | 5d 20 5b 66 31 5d 20 68 |18] [f20|] [f1] h|
|00003bd0| 65 6c 70 20 5b 66 36 5d | 20 6f 74 68 65 72 2d 77 |elp [f6]| other-w|
|00003be0| 69 6e 64 6f 77 20 5b 64 | 65 6c 65 74 65 5d 20 64 |indow [d|elete] d|
|00003bf0| 65 6c 65 74 65 2d 63 68 | 61 72 20 5b 43 2d 64 65 |elete-ch|ar [C-de|
|00003c00| 6c 65 74 65 5d 20 6b 69 | 6c 6c 2d 6c 69 6e 65 20 |lete] ki|ll-line |
|00003c10| 5b 4d 2d 62 61 63 6b 73 | 70 61 63 65 5d 20 75 6e |[M-backs|pace] un|
|00003c20| 64 6f 20 5b 43 2d 64 6f | 77 6e 5d 20 66 6f 72 77 |do [C-do|wn] forw|
|00003c30| 61 72 64 2d 70 61 72 61 | 67 72 61 70 68 2d 6e 6f |ard-para|graph-no|
|00003c40| 6d 61 72 6b 20 5b 43 2d | 75 70 5d 20 62 61 63 6b |mark [C-|up] back|
|00003c50| 77 61 72 64 2d 70 61 72 | 61 67 72 61 70 68 2d 6e |ward-par|agraph-n|
|00003c60| 6f 6d 61 72 6b 20 5b 53 | 2d 43 2d 64 6f 77 6e 5d |omark [S|-C-down]|
|00003c70| 20 66 6f 72 77 61 72 64 | 2d 70 61 72 61 67 72 61 | forward|-paragra|
|00003c80| 70 68 2d 6d 61 72 6b 20 | 5b 53 2d 43 2d 75 70 5d |ph-mark |[S-C-up]|
|00003c90| 20 62 61 63 6b 77 61 72 | 64 2d 70 61 72 61 67 72 | backwar|d-paragr|
|00003ca0| 61 70 68 2d 6d 61 72 6b | 20 66 75 6e 63 74 69 6f |aph-mark| functio|
|00003cb0| 6e 2d 6b 65 79 2d 6d 61 | 70 20 5b 4d 2d 64 65 6c |n-key-ma|p [M-del|
|00003cc0| 65 74 65 5d 20 5b 2d 31 | 33 34 32 31 37 36 32 38 |ete] [-1|34217628|
|00003cd0| 5d 20 5b 43 2d 4d 2d 64 | 65 6c 65 74 65 5d 20 6b |] [C-M-d|elete] k|
|00003ce0| 69 6c 6c 2d 73 65 78 70 | 20 5b 43 2d 62 61 63 6b |ill-sexp| [C-back|
|00003cf0| 73 70 61 63 65 5d 20 62 | 61 63 6b 77 61 72 64 2d |space] b|ackward-|
|00003d00| 6b 69 6c 6c 2d 77 6f 72 | 64 20 5b 43 2d 65 73 63 |kill-wor|d [C-esc|
|00003d10| 61 70 65 5d 20 6c 69 73 | 74 2d 62 75 66 66 65 72 |ape] lis|t-buffer|
|00003d20| 73 20 74 20 74 72 61 6e | 73 69 65 6e 74 2d 6d 61 |s t tran|sient-ma|
|00003d30| 72 6b 2d 6d 6f 64 65 20 | 6d 61 72 6b 2d 65 76 65 |rk-mode |mark-eve|
|00003d40| 6e 2d 69 66 2d 69 6e 61 | 63 74 69 76 65 20 64 65 |n-if-ina|ctive de|
|00003d50| 6c 65 74 65 2d 73 65 6c | 65 63 74 69 6f 6e 2d 6d |lete-sel|ection-m|
|00003d60| 6f 64 65 20 31 5d 20 34 | 20 28 23 24 20 2e 20 31 |ode 1] 4| (#$ . 1|
|00003d70| 33 35 32 34 29 20 6e 69 | 6c 5d 29 0a             |3524) ni|l]).    |
+--------+-------------------------+-------------------------+--------+--------+